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Introduction 



For most of my adult life I've pursued what some 
mioht consider a hopelesflly disorganized diversity of 
proiects, I've developed book&j records, games and loys 
— and an occa3^onal script or aong — for the Children's 

Television Workshop (producers of Sesame Street and 
The Eiectric Company), and, on Ihe side, I've written and 
edited satiric pieces tor ihe NalianaS Lampoon and other 
putjl leal Ions, People ottan ask me If I think It's 
"sensible" to spread myself over so many media. "My 
aollvltles really are all related," I ai^swer, somewhat 
defensively- "At least somewTi at..." 

The truth Isttiat It's the very variety of my work that's 
Kept me interested and chalJenged. And, not coincl- 
dentally, I'm convinced that it's the unlikely mixture of 
rnedlaand people — of humor with curriculum content, 
ofchildren's games with rock'n'roll muslCf of animation 
with phonics lessons; of child psychologists *lth 
puppeteers — that has made SeSdme Sfre^r so vital, so 
excJ ting, and so successful. 

One world that always d/d seem Irrelevant to my 
pursuits, however, was computing. Oh sure^ computers 
mighl store intormatlon, or genarate lists of wonjs 
recoorifzable to five-year-oJds, or Index research 
results, or handle accounts, or, of course. Invade my 
privacy. In short, they might be a usefuf tool for 
someone eise {probably someone pretty different from 
me). But computers as a crea^/ve med J um-^ much less a 
medium \ could actually feel comfortable with? Neverl 

Then, one day a few summers back, my wife, 
Genevieve— then an engineering student at Columbia- 
showed me a book called Bash Computer Games, by 
David Ah I, To my amazement, It had funny pictures In It. 
It was fuN ot games — many of them delightfully slUy, 
And — wonder of wonders! — at leaat some of It 
{sample runs of the games, for example) was not hope- 
lessly beyond my comprehension. 

I was intrigued, and when, months later, I visited the 
Boston Children's Museum and actually got to pLay with 
a computer, I was hooked. The terminals at the museum 
played many of the games In David Ahl's book. What'a 
more, they actually called me by name, and made 
humorous comments atiout my playing skllL After 
several hours of trying to land a capsule on the moon 
(only to be told that I'd created several hundred new 
craters, and that Nell Armstrong "did it right the first 
time"), I had to be dragged away from the keyboard — It 
was past closing time, the museum personnel insisted. 

From that day onj the development of computer 
games — to entertain anc/ to educate — has been a high 
priorily activity for us at CTW. (As I write this, we're de- 
signing a prototype computer game center to open, near 
Phlladelphfa, in 1980- a project in which David Ahl has 
taken a pioneermQ role). Forthecomputer combines the 
possibility ot fun, education, challenge, personaliza- 
tion, humor and — most Important — SnteracHan, In a 
way that no other medium can. Computers are infinitely 
patient, not minding (unless they're pfogra/fmed to 
mind) If you take ail day to respond to a question or 
move a game "piece". II there's something you don't 
understand, you don't have to be embarra&sed to ask a 
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computer for help, A computer can adjust the dlfflcully 
level oi a game or activity to suit your ability — some 
programs even learn how to beat you as you continue to 
play against them. Armed with the proper software, a 
computer can play a song (or hIIoa you to play one)j 
paint a picture, write a poem or tefl a story. Or tt can 
plunoeyoufnio a whole new world, so you can learn by 
doing (or just escape, for a few moments. Into adefJght- 
ful fantasy). 

The games in Ihia, David Ahl's second collection, 
demonstrate many of these attributes. Try Camet, for 
example, Ir which you're left alone fn the Gobi Desert 
with one quart of water and a bunch of Wild Berbers hot 
on your trail. (You'll Isam something abojl resource 
management even If you don't escape to use your new 
knowledge.} Or type Concentretlon Into the computer, 
and let your children perfect their matching and memory 
skills without showing you up. Become a sTarshIp 
captain and practice navigating a three-dimensional 
univarsOj in Maneu vers. Turn on father so your kIdB can 
argue with the computer — Instead of you — If they 
want to stay out laie on Saturday night. Or — the ulti- 
mate trip — play Milfionaire and start your whole life 
over again (complete wjth such decisions as what job to 
apply for, what Investments to make, and what to do 
when an airplane crashes Into your magnificent new 
home) I 

The main point of aJI this fs that whatever else 
computers are meant to be, they can be turned into 
magical muftl-medla machines that put you squarely in 
the center of the action. And, as Dave Ahl has continu- 
ally demonstrated, they're an awtui lot of fun. Turn the 
page and see, 

Christopher Cerf 
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The Basic Language 



Capsule Description Dl MicrosoH BASIC 



SlstG'nenr or 
Fiincfion 

DATA 



DEF FNF[X) 



DIM 



Nol&S 

String data is not always quoted. 

Some BASICS require quote 

marks. 

If your BASIC does nol have DEF, 
simply use the complete function 
itsell whgrever FMF(X) appears, 

Dimensions numeric or siring 
array. Siring scaiars arent 

dimensioned. Subscripis begin at 
zero. 



END 




FOR. ..TO . STEP 




GOTO 




GOSUB 


. 


IF. -.GOTO 




IF. ..THEN 


May be followed by any executable 
stafemeni. 


INPUT 


Optional prompt string may be 
printed before doing INPUT 


LET 


LET keyword is optionaL 


NEXT 




ON . . . GOTO 


Computed GOTO. 


ON... GOSUB 


Computed GOSUB, 


PRINT 




READ 


. 


REM 




RESTORE 




RETURN 




STOP 




ABS(X) 


Absolute vafue. 


ASC(XS) 


Returns ASCII value of leftmost 
character. ASCl"A"t is 65, 
ASCfB") is 66, etc. 


ATN(X) 


Arctangent of value in radrans. 


CHRKX) 


Converts ASCII value to character 
string, opposite of ASC function. 

CHR$(S5) is "A", CHR$(66) Is "B", 
etc. CHR$(7) IS a bell ring. 

CHR$[8) is a backspace 


COS(X) 


Cosine of angle in radians. 


EXP{K) 


Value of e to ihe X power. 


INT(X) 


Greatest integer less than X. 


LEFT$(X$,Y) 


Returns Y leftmost characters of 
XS. 


LEN(X£) 


Length of XJ, 


LOG[X) 


Logarithm of X to the base e. 



MIDI[X$,V,Z) 


Returns substring ol X$, starting at 
poEJiion V, Z characters long. 


RND(l) 


Random number function. Returns 
valuer between and \- 


RIGHTjfXI.Y) 


Retiirns Y rlghtrriosl characters of 

xs 


SGN(X) 


Sign function, Reiurns -1 if X-- 0, 

11 X=0, 1 if X>0. 


S[N(X) 


Sine of angle in radians. 


SQRtX} 


Square root. 


STHS{X) 


Converts X to string of decimal 
digits For example, STR5(& 45) is 
"S.45", exacily as it would be 
printed. 


TAB{X) 


Spaces o-itef lo position X on the 

printer. 


TAN(X) 


Tangent of angle in radians 


VAUXJ} 


Converts a string of digits into a 
number. Opposite of STRS. 



Conversions to Other BASICS and Debugging Hints 

All the programs in this book have been converted and 
tested in MicrosoRBASiC.We have not used any enTended 
or macliine-dependeni features, so they will work in 
almost any machine with Microsoft BASIC [TRS-BO Level 
II, Commodore PET, Apple II with Applesoft BASIC, OSI 
Challenger, EKidy Sorcerer, or CP/M disk operating 
system). However, we ran the programs on a Teletype 
KSR-43 terminal, SO several of the games are designed lo 
run with a 72 character terminal width, and two of the 
games [PATTERNS and PINBALL) use the backspace 
function to print oversirikes. Both of these programs can 
be modified. Uneed be. to bypass the use of this function. 
However,ifyourcomputer has a screen then you may have 
to adapt the programs to a narrower terminal width 
(especially on the PET which is only 40 characters wide). 
Of course, you can also use your screen display for special 
animated graphics if you're clever 

If It Doesnt Work 

Although your firsT reaction may be lo curse your 
computer and start yelling, "There should bealawagalnsi 
people who sell books full of programs that dont workl" 
we have found that almosl sH errors are simply lypmg 
mislakes, or not knowing ahoul some peculiarity of your 
parficufar machine. So if a program doesn'l work, we 
strongly suggest checking your program llne-by-line 
against the one in this book. Kyou keep getting some kind 
of very obvious error which Is plainly not tn our program 
RUN, please bear in mind that we dont do nasty things like 
faking program runs, and that the programs really do 
work Real bugs tend to be rather subtle. 

Cresrive Computing is concerned with maintaining and 
Improving The quality of its software, so we are interested 
In hearing about genuine errors in the games. We will 
consider bug reports If the following rules are adhered to; 
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Artillery 3 



In this game, two or three humans 
may play- Each one of them has an 
artillery piece and h ftrirg at an 
opponent. The first person 1o destroy 
his opponent wins that round of the 
game. The parameters for distances 
and muzzle velocities o1 the artillery 
pieces are set at the beginnlnci cf the 
game. The shots are fired by giving a 
firing angle expressed In degrees from 
the horizontaL 

In a three player game, you may elect 
which player you are firing at; hence 
player one and three could both be firing 
at player two. Once one of Ihe players is 
eliminated, It becomes a two player game 
and Ihe remaJning iwo players fire ai each 
other. 

Personally, I would preferto think o"f 
this game as lobbing mudpies or 
snowballs or custard cream pies or 
something n on -destructive. However, 
it was originally written as shoot-'em- 
up game so that's how it appears here. 

Thls game was originally wrilten by 
Mike Forman and further revised by 
N.E. Lyon and Brian Wesl. \t first 
appeared in Creative Computing, 
Jan/Feb 1976. 




PtArER 2 5H*1DTTH6 AT^ 3 
FJUme fcNfllET 7? 
TGU JJMDEHSHDl Bf 7S6fr.2^3 FEET. 

P{j^TER 3 SHftBTINfl AT^ 1 
FIRING ikMlV SD.5 



ftOUttll 2 



RJPt 



flCTIlLERT 3 



UELCDHE TO ^UAR3'. TLQ OR THR^E tJIMAMfr MI PLAll 

tllS IS A WR flAHE. TUD OR THREE PLACERS AK fil'^^H 
(TNC[]R£TICAL^ ^ANmDN^ UITH IfHICH THE^ i^TTEHPT TQ SHQDT EAG}C 
DTNER, THE FAlTfinETEl^^ FOFt DISTANCES l^NH MUZZLE VELQCltlfS ARE 
5tl Al THE SEQINMIJCB OP EHC BAJIE^ IKE 3]I0T? ARE r3RED BT 
OJVlNft A FERINC AHBLE, ^XPSTESSEH IN 9EGAEES FRDH HQftlZlTHTAL 

TME EONPUTEB UTU KEEP TRACK OF THE QAHE AHIt RfPlIRT AU 
HDi>E9. A 'HIT' IS SCi>RE[r BT riRlKQ A SHiir ULTHIH SI QF THE 
TCTAL llStAHJ^E P Iff EH QVER. GSOD LtlCli 



HG. Of PUtEPa? 3 



PLftTEC 1 SHDOTTNfl AT* 2 

F'JRING AMSLLT 70 
TDJ DVERSI^OT BT BQfl.207 rE£Tt" 

PLATEB : 9H00TIH& ATt 3 
FiBlilG AffSLEr B4 

TO J UNDERSHST BT T2J4,S? PEET* 

PLATER 3 SJIQJiriitB AT? 1 
FIRIH ARSLE^ 73 
TO J OVEnShUl fiT 2?4.324 fEET^ 



RGUND 3 

PIATER \ SHQOTIKQ AT^ 2 

f IRIMf AH6LE* ^Ch 
YQIJ OVEfiSm?] BT I^IS.TQ fCET. 

fLATEft ? SHQUTEilB AT? J 
f ISrufl AffSt-E? ?0 
"rOB OVERSHOT ET 4^.347 fEET. 



DISTANCE tF%) 1 TO 2 T 1«0 
SISTAHI^E EFT",} ? TO 3 "^ a«a 
DlSTAiCE (FT,) 3 TO I T JMQ 



PLATER 3 SHflJ]TrR& AT* ) 
Friri^S AlfGLET 74 

70tl UNffEVSHOT sr 153«J« FEET« 



HII3ILE VELQCITT {FT, /SEC. J OF 1 * 300 
HBliLE VELOCIIT ^PT./SEC-J Of 2 t HO 

HGZZLE VELflCnr [FT^/SCC; OF 3 T 400 



i^OUifB 4 

PLATER I SHirDTlNQ ATT 2 
FIPIRO ANBLET 74 

TDU QVEffaHQT JT 4?0,02e FEET. 



PlAIEf 2 SHB0T1N6 flJT 3 
FIRIrtS AH6LE^ 73 
lOU QVfRSHQT rr 1-40.^£ FEET. 



PtftVEB 3 3HO0TIH8 ATI I 

FIRING ANGLET 72 
TQU DVERSHUT BT «B.?12 FEETh 



RDUIID S 

PlAim I EHIlDTIilO P1r 2 

ran WER5N0I Br ija.oi* fkt. 
Fit [ MA A>jeur ^ 

* H17 - 3 13 BEFUhCT. 



PlflTC^ 1 BUOUTIW fli? ? 
F»li& AHGLE'' 73 
rnU DtfEBSBflTBr M3.824 fE€T. 

«flTE» ? SHOeTtVe ST? 1 
FlltliU AHELE? 73 
TOU OVERSIUF Br M?.?? KET. 



rouhd 7 

PLftrEv I SHooTTne at* ] 

Fin J He UCLCT 7f.4 
■ BIT - 2 IS DEFUBCT. 

GHIE OVEK. 1 UlilS. 

or 



U5T 

9 PUniT Tfl»t7?i;-flBTTl.LEBy J- 

?«INT rflB(ift>j"C»tflTriJt EDflPUTlllQ'" 
11 PSllfT TtBtiairtHlflfflSTaUtf, WU JEfSET- 
11 I'BWriPlflllTiPBlJIT 
2t T-0 

il Blrt VC3>,JC3>,PC3},ft(3,3* 

71 Hiir tf^IFR 

tfl hT K=IE(r 

?0 Hiir P=7Efl 

UO PAT l^-JER 

110 DAT4 lr!.2.3,J,l,T.3J,?,j,l,2,3.3,(.l,j^S 

m PP HT -gEKDUE TO 'MR3'. fllO OB TfllfEE |l|J««Ee Mr PUTF' 

i» pfiWT -iiQ rau HI5H soue flssjarwcE-; 

no IJIPUT 4t ' 

lao IF fll'-IES" THEN I31U 
141 fklHT — 

1?0 fKinJ -n. OF flrtTEfiS-: 

leO IflPUT 4 

110 IF If. 2 THEN 740 

?80 IP H=Z THEN Z70 

|I0 PBIBT -EIHUW— TUa OR MPfE PLUTERST* 
21tl GOTO lit 

2Sa PtlHT " 
2dl> eilTQ 2fO 
370 HT-lf 

3afi Pfriin -■ 

ZTO PDir jBi Id HI 

3n ITEAD A,B 

JtO Pf mi "IHSTflllCE (FT.) ■;*" Td --B" 
310 iJlPUT f[(fl,|) ' ■ '"' 

3J0 tC|,A)B«CA,|} 

3'e KEXT J 

J50 pimr — 

3U RESlOdE 

J70 IF M"3 THEtt AiO 

310 FOP J-1 TO H 

3HJ READ il,^.i:,il,F,F 

<flO if »U,BKH(C,I>«IE,F) TUE>1 AAO 

til "JfJ^i^^^"""''^"'^ '^^'*^- '^'"^^ *"»"■■ 

4JD earo jto 

U9 HXT J 

4iO PBIVT 

*t( Fn» J- I TD M 

Z',Z]Z?'"^""" '"■""■' "■■■'■■ 

4n HETT J 
5S0 PfilKT — 
Sia FQfr j>i TO V 



a?s xfjf-vur2/j2 

330 HETT J 

s*t ran fta| TO H 

5S0 FDB B«l TD 1 

%0 IF H*)>(rfft,|> THEM 4T0 

S« PffBT ■EBIHIE---:fl-- CdNFfflT (EAEtf -;( 

6M BOTO B]4 

^10 HEXT 9 

a» If Ell A 

«30 BF-lf 

i« PBiHr — 

iHt PitlJIT •" 

aiO PfflllT -MJHI -;l.| 

A7« PfriHT 

tin fm tt-i TD H 
tta IF ii±a mEH 71c 

?flO 0*1 

^'lO IF «<> I THEN 730 

7?0 C-J 

715 PRIHI -PLflTEIi -;n;- BHOaTIHO ftT ':£ 

7<0 OOIO p»0 

7W IF P(||>.|J TNfH 1700 

74B PHUT -PLATE! 'j.fnioaTINB AT- 

?I0 on C SOTO 0J^,B3 5,030 

810 P*ilH "EBffQII-PLATEIfa BESlGflATEft ),!,3,- 
97? aOTD 7ta ' ' 

034 If CO If THEIf 949 

a*0 PIUHT -ERRQIf-CflllNOT ShODT SELF - 

03CI GUTO 7«9 

BiO IF PCC] <> 13 THEH 890 

870 PRiflT -EJHor— ■-":;' is kfukct- 
etc PBfai -FitiifD ANfltE-: 

¥M IHPUT fi3 
910 If n<* TBEff f40 
9?0 IE A9>IBD THEH ¥49 
VJO QOTO 970 

9flO GOTO 760 

970 If A3<90 TKN lOJf 

*80 PflllfT -EftROft-flSEil LVnUO IfAY, LCOE 3BDT ■ 

"0 eora jut 

1 000 2'S I H (A3 >3 . 49Oa4£-0Z J"H II > ' 2/32 

SOTO '=rBfJl,:>/nnj(l.lll|Bn)> -CP(K,Cl/IO(H}-BJID[IJ* 

io?e i=!fii 

1030 B1'R(fl.GI>«*S 
T04O IF B<D1 EHEB 1009 

1050 IF ABa(D-fl(HjCll<Ill YlffiH ]|10 

104» IF IKIUN.C) THEN 1140 

1070 IF D>P(ri,Cr THEH U6*t 

1000 PPWT - TOO CLflSE- 'Hif iS BEFUBCT,' 

7090 P1HIM7 

■ TOO GOTO I ISO 

1110 PGiNI ■ t HIT- --CJ- IMEFBlfCT.- 

11?( ?ic>=tz 
1130 euTo iieo 

Vfll T^Oim"^ HHBERSMT Bt ■{ftBaifl-BlftC^f fJET.' 
11?! 50^D^S7^ ''^"'"" *^ -I^SfD-B^M')!" FEET.- 

nao ni-Ni-i 

T190 JF lil>1 TNEB 127l> 

1700 FOR 11-1 TO N 

1710 tF P(Nn-T7 THEN UX 

1!70 PPTBT 

1?J0 PPIHT 'OABE OWES. -jHIr' UlifS.- 
1140 OOTO 1430 
1790 NEIT N1 
IZAO 5T0P 
iJ70 PRUT ■- 

1300 IfEKT M 
179n T=r"1 
1300 SOTO at 
1310 PBIN^ 

13^0 PPJfl? -Tills Tg A 1IAR QAflE. TUQ 00 IHPFE tLflVFPI a?F ai4i<^u. 

^Mil ntldl BTftEK. THE PAEABETEFTS FOIt OlBTfiJfCiS HHH BCIULE UELQCITEES AC 

1330 FtlBT -SET AT iNF BEaiHHINO DF THE SME. IflE 9HIIT3 ARE ffPEB &T' 
.3J0 PJINT -OIUINB A FIRlHB AifOtE. ««fEBSE, iZS ^VS^^MTAL" 

j»; £s ^isjsJbJb;^ j^RistEraJir^^^*-^' -""" « -^ "^^' 

1430 OTO »• 
too EifB 

Ok 



Baccarat 



Games of Ihe baccarat and c hem in 
de fef family originated In ihe baccarat 
thai became popular in the French 
casfnos in the leao's. In Ihe present 
century they have travelled from Eu- 
rope to the Uniled Stales, back to 
Europe, and 1o casinos throughout the 
world This process has resulted in 
wide ifflriations in playing rules and 
what is caJled "baccarat" m one casino 
may mofe nearly resemble Ihe "chemin 
de fer" of another. 

The compuier game here is more 
nearly cheman defer than it is baccaral. 
The ruJes. briefly, are as follows: Eight 
packs of cards are shuffled together 
and placed in a "shoe" from which the 
cards can be slid out one by one 
Following this, the players make their 
bets. Arry player may make any bei up 
to the amount of the bank Theplayerat 
the banker's right has the first choice to 
bet- Any part of ^he bank he does not 
take may be bet by the nexT player on 
his right, and so on m order until the 
endre bank la cove red or until everyone 
has bet who wishes to. Any player may 
take Ihe entire bank by saying, ''Ban- 
co," but when two or more players wish 
to banco, the one nearest the banker's 
right has the privilege. 

After the bets are placed, the banker 
deals two hands ot Two cards each, 
deaiingonecardat atlme Thehandhe 
deals first represents ail the players 
be)ting against hfm; the other hand is 
the banker's. The player who has made 
the Jarg est bet against the banker plays 
the opposition hand. 

Theobiect of thegame is to hold two 
or three cards which count nine 19), or 
as nearly nine as possibJe. The values 
of Ihe cards are: face cards and tens, 
^ero; ace&. one each, any other card, its 
number. Units of ten points are dis- 
regarded, so that nine plus seven count 
as six, not sixteen. 

A player whose card is nine or eight 
in his first two cards shows his hand 
immediately. He ha& a natural and his 
hand wins (but a natural nine beats a 
natural eight). Naturals of the same 
number tie, and there is a new deal 

When the result is not decided by a 
natural, the banker must give a card to 
his opponent on request, or the oppo- 
nent may stand. The opponent must 
stand on six or seven, must draw to a 
zero, one, two, three, or Jour, but has 
the option on five. The additional card, 
il gfven. Is face up 



Then the banker decjdes whether to 



stand or take a card. 




IF BANKER GIVES 


BANKER STAr 


Face card or ten 


4, 5, 6, 7 


Nine 


4, 5, e, 7 (or 3) 


Eight 


3, 4, 5. 6, 7 


Seven or" six 


7 


Fi^e or four 


6,7 


Three or two 


5,6,7 


Ace 


4, 5, 6, 7 


Opponent stands 


6,7 



Neither player may haue more than 
one additional card, giving liim ihree 
cards at llie most. When each player 
has exercised riis option, the cards are 
shown, il the totals are the same, Ihe 
bets are off and may be withdrawn and 
new bers are placed exactly as before 
for another deal. IJthe opponent has a 



3, 2, 1,0 

2. 1,0 {or 3} 

2, 1,0 

6, 5, 4, 3, 2, 1, 

5,4,3,2, 1,0 

4,3,2,1,0 

3,2,1,0 

5,4,3,2,1,0 



higher nurnber than the banker's, each 

playercollectssuch portion of the bank 
as he has covered. 

In the game of chemin defer, the role 
of banker rotates among the players 
after each hand; In baccarat, it does 
not. 
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BAl^ElilT 
CDEiqtlliE (ONPUIIM 



»aCC4irfiT -- LihEIIEIf DE FtA 

DO \QU (fEfD UsTRllCTfONSt ffS 

BfiCCiBf4I I^ 4 VE»I PDFULAH UMl IH LA^ 
UESA?. IhE FLAIEH MO htH^lk EACH REflElUE 

na cms FFOH 4 'EHiiE' cDrflfTnlnQ a aicm 

DP CMOS. All C*f> tttPSTHPIZDIfS TDIfltlrtB 

lEn Ati vaT cDUfiED, tHt HUE imt enhs up 

ClflBfF 10 NIKE aiK, THE STAKES AflE H|QH, 

All Qf THE Kil'tlfS 5Ifl»T HUH lEH Tfl[W50tfD 
DUI-LARB. lOU CAN BEI DEI THE U^l^k Qtt THE 
PL4^f(l^ fi IHIRH cava IS SIVEri UriLl JNlTElf 
CEHTAlb CDHPItlOhbp ai im HILL S€E^ Ltl 
U^ BE9)I'. OODI LJCK1 



hQll (Hm PLtVEjTS? 1 

VhtT IS THE (fUtlE BE PLfllE* ) » BTE^IE 

SIEiJE IfflS * lOOPO . B£TT 50Q 
(]J BAUHfFT flfl (2) fLftTEBT I 



FBUft: BF SPADES 
EEBhT 01 HE4B1S 

PHiliS nusi tuAtl. 

AtE DF 9PADES 
PLATER CAIKQT »RAU. 
PIAVESS TOT All * 

BBUkEH husi DFrau. 
FIVE or DiAnQnpa 



PLAfEB 

FOUR Of aPflliES 

Hint fit DIAHOHBS 



SIEVE 9IN? 1 



^40 , ton B TOTAL OF > 1D!^flQ 



Ntif e4flE 

SIEVE HAS t fOlOO . BEI' 1000 
('J fiWICEl: DB IZ) fUVES' ? 



FSElR OF I^LUBS 
ttlHd OF HEAFrlS 

eiM^n nirsi dpau, 

TIIO Of HiARiS 
FlSI£« CiiUJfOT ORfiU. 
^UTEfa TQI4LI 3 

BfiiUIEFr HUST DRAU. 
KlhO OF DUnoHirG 

BMKEM rarsL: 1 

lAKKEIf U|lf9ii 

aiEUF LOSES 4 10110 . 



PLflfEP 

FOUR iF oitnatns 

SiVZU DF ^i1£E3 



fas t TOTAL JJF I »n} 



■Ell GAFIE 



STEBf HAS t 9^00 . BET' 9400 
in £ANi;ei: qit izi pieyEPT 2 



PLAfFR 

JACr OF CLITBS 

F[I;e UF CLUBS 



[|I0 OF CLUk? 

JKt OF iJAnONlB 
PLftrEB BUST MhU. 

JACK OF HEnffTa 

PLlirER TAMHOT »RAII. 
PLflrflfS 107*1.: 9 

tftflVEP llirST HfifiU. 
TARF^ OF BlAnOHDB 
BfiHRERS lOTALr 3 



ET'SATTE. THE H»FIB fa ?lAy£D OVEf. 

STEVE HAS 1 ?aau ^ BET' 940O 
(It lAKHClt OR I3t PLAICP* 3 



1* fmWT T«(?il;'Bi*CJ<fiT- 



7» 

4^ 

Sfl 

AO 

7t 

9» 

?1 

UO 

III) 

TJH 
ITd 
ISO 
1&0 
170 
ISO 
IfO 

?tci 

?I0 

2 JO 
?<0 
3^0 
2*0 
270 
?B0 
2£J 
2B1 
367 
250 

3 DO 
310 
3Z0 
330 
34f\ 
390 
J&O 
3'0 
373 
375 
377 
37? 
3 BO 

410 



PSIHT 3AB{?(ir;-i:fl££iUVE eOrtPUTlffQ- 

PRiHT TAKiahl-nORPigTBUfl. P^EU JE(rSEr;PfllKTiPRlrtIiPBIlfT 

PSIfT-BflCCASAT — CUKIU DC FCff" 

PfttUT 

FSINT-BB TDU DECB l«5T(llJC T I OdS " r 

IKPUT Ql 

fF mO-TES" THElt 210 

PRllfT- PfttCflJ^flT 19 A VEPI POftJLAR EAIIC 

PSfFir-iEeAs. THC pLprEp m banker fah^n 

PSINT-IUD CARDS HtQti H 'SHOE' CONTfllfllRG 
PRJI*T"D'^ COPK. filL CfilfH DDBBlNflnCNfi 



]h LflS" 

KEDEJiJE- 

S DfClfS- 

rOT4L]Nfl' 



PR<>fT''rtN ARE NOT COUIITE[f. THE QNE THAT ENffS UF" 
PFTIHT-CLOSCR TO FlItfE NlNB. THE SlABES ARE HIGH," 
PJHllT-iU.1 OF rue PLATEBS START UIIH TEN TMDUSAWn" 
FffNT-poiLAHS. rou C4N Hi DH IHC lEALEIT OR THE" 
PRfElT-FLArEB. il THIRD CAltfl IS QlVEW OHLI UHIEP- 
fRIMI-CCRTi*I1f C0«lTlflH3, AS TOO WUL SEE lET" 
PRIWT-IJS BEflfN. flOOlf LUCK'" 

PFrim 

Hm H<!C>,Fim>fF(30),B»n3),U(l3),l3<f201 
IIK Zf9,(0),Qj4,13] 
FQf (13 TO i 

FOR l-F TO 10 

REAO 711, ]> 

NEII 1,1 

FOfl 31=1 

FDP SI"! 

fOR Sl':1 

FOR S1=( 

PSIHT 

PPlSr-iratf HAFT^ PLSYEFa 

INPUT Pi 

FDS J*| m PI 

PRllfT"UH4T 13 

TriPlFI GUM 

H1JJ>]00I>0 

NCm J 

FUP Sr<1 TD 

FQR 92>l TQ 

II1S1,B?J>C 

NEIT 9? 

NEO 91 

FOB J-1 TO J 

C=lNTl[tffWIllTJi.4J 

It'3|fJlT'RHD(Wii|J) 

flic,Diiaic,BrH 



TO 
TD 
TD 
TO 



I0:READ lfCBF>:tfElJ 

♦ iBEflO AllSUiHEXT 
UilTEAB BIISIlTHEJir 
UlREAO "JiSlJiHEn 



THE W«1E DF PLflYOr-J: 



4 

13 



BET- 



Tlt£H 340 



4J0 IF 0IC,DJ>=32 THEIf J¥0 

431) S(J) = tf<[|J 

440 i:i(JJ = pt[iijt- OF -ifl„cj 

490 HEIT J 

460 111=? 

47* FDR J'l TO Pr 

4flfi IF fiUKI THEfl 380 

"0 psiHT GKjj" iiiis »-nij>-, 

5IH> ihPUr FIJ) 

51& IF F1JJ>IHJJ THEU 4¥0 

5J0 IF f(JK>IIITiFlJ|f THCH ifO 

5J0 IF F(Jm THClf 4»0 

MO PRlRT-ril I^FfKER OB 131 PLAIER"! 

390 IHPUT FifJ) ' 

5ftO If Fl(J)J = l00l> TMEW 490 

?i70 IF (FllJ}-lH(FlfJt-2JOfi 

3Bi> IfEIIT J 

arc JiC 

6^6 TJi'B1JI-'S{4? 

A 20 PRI>1T 

i30 P B iHT " JflNKER " TflB 1 20 > "PLft TER" 

d40 Pfilwr Ct(iJTflHf201C»{IJ 

4S0 PRJHl CICI)T«(20)CI12J 

4iO IF TI^O IHEH iaa 

470 II=r(-TO 

iaa \f 12(10 THEN 7flO 

ifO [2=T2-10 

7(0 IE ll(TI + IJ=a THErf 770 

71 C PPMI-PUICR HUST DBAH.- 

770 PBIHT CtllJ 

7J0 11=11 tB{^h 

?40 IF TKIO THCH 770 

730 TI-Tl-rO 

7i<l eOTO 7f 

770 PfilHr-PtATElf CflrfHOT flRflU." 
?B0 J=ll 

?*0 PRIIfI-PlAS£Ra TDTiH,T-Tl 
BOO PBEHI 

aii IF 12(3 THEH 07C 
a?0 IF T2'i THEN ?3* 
830 IF J011 tHEH flftQ 
94C [f T3=4 THCr^ 9iO 
Bif> QOTO 9?0 

BiO IF 3(T?,B15>.|)=0 THEJr ?J0 
S70 PRIHT-BANKEI: nUSl BRA|I^- 
010 PBIIfT Cf<i} 
T?=:?*B(4h 
[F T2ilO TKEH ?20 
r3"T2-lO 
ODTO 940 

PHlHT-BAHttCR CAHHar DRAU.' 

PfilNT'BAIfKFflg TOTAL: "T3 

PRINT 

IF T20Ir TH£fl »90 

PRIKT-Iia A TIE. THE NA^I IS PlAVEIf eUER." 

SOTO 300 

IF T?(T1 TKFIf 1030 
UIM 

PRlfJ"Bfll»h;ER tilflSM" 
ODTO 1040 

PB [HI-PLATER UlriSl E" 
FQIf J*l TO PI 

JF NijK=o mat 1IJ0 

FtflfT 51 IJ)' "; 

IF F1(J)-UI THEN Iflfl 

ll(JJ-ll<JJ-FOf 

PRINT"lOfiES I'FUJ", FOB fl TOTfll OF VHUf-, 

SOTO 1 fJO 

■lJ)"iirjfvFfj> 

PRjNT-III-5 rPIJi'. FOB A TOTAL OF $-HfJJ-.' 

FBH JU TO P» 

IF rtUJ(JO THEN IITO 
NCTT J 

PRINTTHA-K TDU FOR lOUB nSNET, AMI V 
aOTD 1330 
PR JUT 

P"""^-- NEU OflHE 

PRINT 

FOB J'l TO 4 

fOS '=1 TB 13 

IF Oi:|,TK>B TWEd T80 



900 
910 
9!0 
fJO 

940 
950 

P70 



9P0 
1000 
lOlO 
1020 

1030 

u«o 

1 060 
ID70 
lOBO 
T*rO 
1110 
IflO 
1120 
IIJO 
M40 
II&O 

luo 

1(70 

1IS0 
1F90 
1?00 

r?ia 

1730 
1730 
1240 

ma 

1270 
12^0 
T290 
1300 
1310 
1320 
'330 



HEJLT 
OOTD 

HAT* 
EATA 
lATA 

HATA 

PRINT 

£N0 



1,f 
370 

'tIt'.i, 1, 1, If], 0,1,0, 0,1, i,i,f,r, 1,0,3 
D,o.o,o,1,l,1,1,J,1},c,o,5^o_1^^^^^^ J ( J 

' t Ipl f 1 , 3 rl . I>,D,II ,0,SFflMS fHEAmS.DlANONira 
CLIIBS , ACE , no , T HREE , Ffl "R , F IVE, S I ^ . SEVEff , E I DH I 



Bible Ouiz 



BIBLE OUIZ Is a program which 

administers up to 25 queslions about 
the Bible to the us«r. Iftheanswergtven 
lo a quQslion is correct. The program 
proceeds lo Ihe nexi quesiion If an 
in cor red answer is given, the program 
g1 ves th e co rrect ans we r . I n e i ih e r c ase, 
the biblical reference is given 

Note mat Statements 124 lo 296 
could serve as the basis for any type ol 
CAI dialogue with instructions 
preceeding Statement 124 and the 
questions and answers in the data 
statements. 

This program was written by Sieve 
Wentworth of Muskingum College. It 
originally appeared In Creative Com- 
puting, Mar/Apr 1977^ 

9 ISLE Wll 

CREftTIVE C0W*E]T1«6 
nCltRISTmdNf NEU JESSET 

THES SAflE IS A Qt^lZ VHtCli TEST? 

YDUR KMHULEIieE DF BEH-IUj^L EV£ttt9^ P|,j4C^p 

I UILL A3K T0([ A [flJCSTlOH Ai^D TH» UAIT 
FflE tflllS ftWauEB. Ef "^Ollfi AMaJER IS EORSfET 

I UlU FSBCEEU JO TJtE tt£)t SUFSriOfl. IF TOUR 
AJI3UEFE IS IhiCltltfifCT [ mS-i £lVE THJ THE 
CDflREDl AH^UEe AUG TNEJt F ROCKED TD TItE 
IriEltT l}UE5TI0H, 

jU.1 AHSif ER5 ARE i3NE UtffiH . 

flU- AHSUEfii ttUST BE L0fiS£E7U SPELLtC* 

IHEKE IS It TOf«L OF li aUESTIOWS. 

HDJ fliitr aJESTIQNS SO TOU Ul^H TO TRf^ 7 



aBEfllOll I i 

UHftT Sfliffi-CDflPOSER E3 CffEBiTElr WITH lO« SOHfiS"? 3ffl_aH13tt 

ctHRFcriHsijEn— vEPr foiJD! 1 hiNfiS 4tj: 

UlfESTIDM I 2 

UHfrT tllVa t\M KlUEJ) THREE THQUSAIfD AT A PEtlljUUS fCAST? SAilSOH 
CQRftiEl liH5*lEB"VERV 800B! JJBGES 14:23-30 

QJESnON » 3» 

UBO HIllEO tiES If! OTHER EQf^ KlMBLINIf HIS Sl^TEflf ABSALC^ 
CQRRECT AK31fER"VERT eDUBl 2 iMn ^3 

auESTimi ■ 4 

UtflbT BUT HAD ft UIIHE6ATEB CO*T^ JOSEPH 

^WEECT AN^UEn-^VERT IQQOS QEtt* 37l3 

QU&^TIETir r S 

UKD CtUlBEB A ~niEE TD SEf JESUS'^ ZACCHAEUS 
CBBRFHT MKUER— VEAV SDO^i LJKE 1fr4 

QBEfllDN V ^ 

UNS set: fine to TfffiEE HIJKOAEB fOfES TAIL9T SMiSHh 
CDSfltCT Mavefi"VFfi¥ E(^QI^^ t JLBGES (5:4^5 

QUESTION V ? 

UKAI £ITT IS CALLED THE CITY QF PAlft TREES? BABS 

IirCQJIAECT AHSUER 

?IIE CORRECT AH5UER J3 JEKICHO. DJET. Utl 

EiiTT QF 7 auESTieiKS YDU AJisLKflo 6 i:srf^j:tlt. 

fiHlG FEffCEHTASE FCR CC^RSECT i^^SUERS IS ^6 I 



5 FfilffT TAFC^^^; "BIBLE QUIZ" 

6 PRiRT tabc2S^;"[:reatu'e csspunnc- 

7 fRIHT TABCaB^;"HQkRUIClUN^ Ngi; ^ER^EI" 
9 PRmT;PRm;PplNl 

1& PRINT ►THI? HftHE 19 A OUIZ UHJtH TEST? - 

2^ PHiMT -TCIUK KJfQULEDOE QF EI&LKAL £g£.NT3p PLADES^ 

34 PRINT "ANIt PERSflKS.^ 

44 PRINT 



51} 

44 

74 

34 

?4 

TM 

TIC 

llfl 

II? 

I^C 

122 

If* 

IJO 

1!1 

n? 

143 

130 

IdV 
1^2 
j?& 
1B4 
1B3 
1&4 
IBS 
ISA 
2t4 
224 
234 
214 

J40 
570 
272 
2flC^ 
2¥0 
2?Z 
294 
2?4 
30] 
302 
3« 
104 
303 

347 
JOB 

34^ 
314 
3T1 
3t2 

31 J 
314 

31 & 

it 7 
3T9 
3T9 
3Z4 
371 
322 
323 
324 
325 
3Ji 
3?7 
12B 
32? 
334 
331 
332 
331 
334 
333 
33A 
337 
48? 



I RILL ASK YDU A QUESTION ANB TiiEN UAFT " 
FOR TOUR ANBUER. IF TDUR ANSUEH I? CORRECT " 
I U[LL PflQCEED TO TNE KEIT fltlEaTIQlf. ]f T3UR 
AN;U£R is incorrect E U^LL eiVE TOU TliC '^ 
CSRREDT ANSUEH ANB INCH ^RQCEt^D TO THE ** 
"«EIT QUESTlQJf,- 



"ALL AN SUE RE 
"ALL Ai^SUEAs 
■THERE IS 



COFIJfECTLT SPELLED «' 
A TBTAL OF 23 QUESTIONS.' 
DUE&TIONJ DO TOU UJSH 1Q IR'T'I 



ARE Q»fE 

Htiar SE 



N 



PflCWT 
FRI417 
FR]JIT 
PRIIfl 
PRIRT 

PRINT 

PRINI 

PRINT 

PRTNT 

PRINT 

PRINT 

EifPUT 

PRINT 

DIN &C2}3 

CO 

HT^O 

RfSTDRE 

ir C=M TNEi^ 

C»C + 1 

PR]« 

fRIhT 

FR!ffT 

ll'=IHTlRN0(])*2?f1^ 

IF SCX) = t IhEit 1S3 

flR D*t TO J4:REA0 aipA4rV4:NEXT 

PRINT 04; 

lafUT H 

IF R1:*AJ THEN 270 

PR TNT -^JifCaFFPeilT ANSUEft* 

PRINT "THt I^QRRECE ANSUER IS ";A»; 

GOTO 1+5 

PR TUT CORRECT AitaUER—iJERf OaOO' 

NJ«FtJ+t 

GOTO ;4S 

PRINT 

PRINT "OUT Qf -;H;* UlfESTIOHS TQU 

P>INTE4HjyH3*igOt^^3 

FREtfl "TQlfJt fERCENTAUE ^OR CSHREilT 

ItATA 'CtHfl SET FIRE TO THREE HONDItED 

DATA *1 JHBSES T5:4^5* 

OATA -OlfAT HEBREU SES'^EI^ H Qt^CCK 



«0 



■QUESTieiH 1I'';C 



D 



rv* 



r^'* 



ArtsUEftEO- ; m ; * correc tl y . ■ 
iHanEFis is-iPrs" 

FD:fE3 TA[LS-.'^S-1«0N* 



LUrtCli iJHOER A TREE' 



DATA 
OATA 
OAlA 
OATA 
OATA 
OATA 
OAIA 
OATA 
DATA 
OATA 
OATA 
BATA 
SAT A 
BATA 
SAT A 
DiqTA 
BATA 
BATA 
BATA 
BATA 
BATA 
BATA 
BATA 
DATA 
BATA 
BATA 
BATA 
BATA 
DATA 
CAtA 
BATA 
DATA 
BATA 
BATA 



A FRUITLESS FIG TREE" "JESUS'* 



'UHAT HUNGRY Hat CORSED 
" HARk Ilti2-t4'< 

"UHO KILLEO HIS IROTIIER FOR HEELING btl3 SISTER' 

■AESALflH\"J Sflrt. 13" 

'KHO HAB THRfE ftllNBfl£& tBNCUBT*^e3"^"SDLaH0N"p' t KINBS 11:1-3" 

^VHAI flOT NAO A VASIECATCD COAT't^JOSEfH^- UEtt. 37 ;3'* 

■tfHO flAB A SEAHLESS COAT" p "JESUS %' JflhN f?:23" 

'VHO TflOB Off HIS JHflE TO BINO ft CONTRACT" p"&QA2-,*RliTtt 4:7-^ 

*lfHG SIEPr Ctt Ai^ IRQ# BEOSTEAL UVER THIRTEEI^ FEET LQnO" 



"flt 



p ^ 



BUET^ 



"JtHO UAS THE 



3:11* 
fIRST 



eiTT-BtllLBER- "CAlif",^ aE«. 4:17" 



AH 
IS 



AUTHOR", 'LUKC't" COl, 4:14'^ 
CREOETCS UITH 100! SONGS'* T'SOLOrtOr^ 



KULEfl^rflBCL't- 0Eil- 4lS'^ 

OITil HIS UIFE^'^ABRf^HAH" 



"UHAT J^HTSICIAU UAS 

^l*HAT ^0dJfi-Cfln?4SE[C 

^1 li[N05 l:3r 

"UHO UAS THE FIRST PERSOff 

"UNO UAS BUf^IEO IH A CAVE 

■ GEtt. 23:T-tO" 

"UNO ACClDEitFLT HANQEB itEltSELF Ifl A TREE" h "ADSaLON"* 

"2 SAft* 182?* 

"UNAT OLIHB ifAH RILLEB THREE TI^OUSAtil^ AT A RELICOUS FEA^l 

■SflflSerH"," JUBGES 14:23-30* 

^-UNAT UAS TRE HAnE flf THE FIRST CITT EVER DUILT* 

^FttOCH^^ SEN. *jl7»' 

"UNO UAS A JTIUHTT HU If TER" ^ "rtlHROO" « " BEtt^ 



]0i¥-12" 



■UHB IfRflVE fURIUBSLT"p"JEH0*p"2 KIP*GS ?s24- 

"UHD klAS THE FIRST CHRISTIAN HAftTTR","STfpHf N',- ACTS ?" 

^UNQ fELi A3LEtP DUeiNfl A LCu^O fiER»tDt*"/CUTvCNOg" 

^ ACTS 2fl:9" 

"U«AT CITf IS CALLEIh THE CITT OF PALN TREES" p-JERlCKO* 

" HOET. 34i3' 

"UJIO CLittBED A TREE TD SEE JESUS'^ p^'ZACCHAEUS^p" LUKE 1?:4' 

^URO «UUD &DLIATN"/M1Ttt*p"l SaH, 17:4?" 

^U«0 (MS CAST INTO A BE+I OF LI0tt5-,*BAflIEL-,* OAN^ i;ti" 



6 



Big 6 



Big 6 Is 3tr\c\\y an American invert- 
lion from the casinos of Nevatfa There 
rs a very large wheel mounled verticat- 
iy. generally io>j, feei or more in 
diameter, thai has the nurhbers one 
through six ir> a random arrangement 
around rts perfphery. Players pJace 
Iheir bets on a roulette lype of obJe In 
froni of the wheel. The wheel is then 
spun and fhree numbers are declared 
the winners. These are the three 
nunibers that appear at the top of the 
wheel. Most novice players looking at 
the wheel think That sjnce there are 
three winners they have a very good 
chance of winning a large sum of 
money. Belling limits are generally up 
to S500 and, as many players discover 
very quickly, the odds are very heavily 
rn favor of the house. 

Jf you feel thai you must play Big 6 
try if by computer first and then figure 
out how much you can afford to lose 
when you go to play If In Las Vegas or 
Atlantic City. The computer fs a much 
better sport when you lose than the 
cesmo managers will be al either of 
those resort cities. 

Big 6 was written by Steve Heywood 
and Dave Alvey 







.rl^'ll "'"" " " "J" "l^^^l- S"E '" ""[CH 
'Ob CA. KJ 0. At>r JtUUIEF HJUZEH Q,£ ii,fl si» 

AM UP ID lh»E£ HUllBeifa. 

'Hi noiisf u*irT 15 Fffon n to «Mif 
EHB rma rtoisttn tin the twitii grnp' 



Hfla HMr nuflicitE 10 ran uwt to Bur mi i 
yrtHT 10 

THE mcKV mavia fltzi s :s i 

TDJ LOSE OUT 4 
IDU'St lEHIIID t-\a 

NBH nut MUBEK BC rOU Ujtfll 10 6Ef 0^ J 

U«*r Tint WiBCffst 2,4 

UMEB Dk ID TNT 5,10 

TBf LUCn -[ThflfM ftHEi I 3 a 

TDlf LDat Qjr: J 

mil mSE DHi J 

VM-it( iimirEi 1-29 

"flU Jtwr iiwiKirs lo lou (uni td Kr Dat i 

UHllT THFfE .uniEJtS- 1.3,3 

una tn ucn ap rur thwe' 1,5,3 

T« iBCHf ir^fllEin AtEi I i V 
IM UEh I rillE5 Cllil 
ISU LIHF QUI 3 

TBU LOSE IMr 3 
TOU'Bf lEHfJir t'3t 

HH HflNT hJH|E>fS SB T(U UmT id BH M' 2 
imi IIW JfUNtEDBt I.J 

uKEt an tartn 10,10 

THE lUKt HUflBeirs -HF; 1 4 i 

YlM Ullt 1 riH£S ON] 1 
TH LOSE DUE i 
TMf'Se BEHIND l-» 

HSU ll"T HlAJEftB Dfl TflU U*lfT Tn tET l»T T 

UiOEII* 100 

TIE LUCHT mmiERB Aliei 4 S d 
■OU Vm I TI1E5 (Hi J 
■rOll'Jt AHEAl I JO 

KDH HUf riWaEHS DO TOU UUT ID lEI OUT Z 

1*«T rao iUJIEEK* 2,4 

U'BEV OH POTH-- 35, :i 

THE LLCHT NOfllEffS «IEl 4 A j 

rHU LD9E Offj Z 

KU lim I IIUFS tW. t 

HGv nMr hutiifirs u loy u4nt to kt out j 

M"T TXltEE riUlIf Etjf 1,2,3 

1H9EH 04 EACH Of THE TN(f£ET 14.1i].?| 

Tffi lUCU NUHIEBS rtE: i 4 i 

TOO 103E Sb; 1 

TUQ LQ^E OHj 2 

YJW Oia ] TINES OUT 3 

fOU'PE MlEAl t ^0 

HSU KAITT MNIBERS » TOO BMT TO IET »? 1 

WBEHT SOO 

tU lUCHy MUkBEItS ilHEi I 4 S 

rrnj Hijt 1 HUES an- 4 

TDU'ftE AKFAI t 37g 

H4L 1441 KSKBEAO M rotf UAiT 10 lEI 0*7 STOP 



SO rVi! ilAnj TO GABH TH TQIW CHIPS, | SEE< M 



LJ5T 

1 PftlHT TAai27}rnW* 

2 Pftltft Tiif{24};"CREATIiJ£ CDHPUTI«*' 

3 PtrtlTT rAV[1»];MDIffl[ST0liHr HEU JCirSEY" 
A Pftllir:fRINT:PJ{]#T 

1D PRIHT - THIS PRlffiRM IS A IICE Ull££L BAHE » UHICH' 

30 PRitfT 'TDU [lAV ICT ON UNr HJtIBEH HTUtEH QHE ANfr SEK^ 

JD PRINT ^MIIl UP TD tHfTEL NUHBEHa." 

AW F-RIIIE » THE HDUEC LIHIT IS FRDH II JQ ISADH" 

3C FRIHT -TO EN5 THIS PflOSBflfl TTPE TK UDAD ^BTOP^- 
^iJl Pltllff HQoQi^ LUCX!" 

^^ FftlEITrPRINT 

i^ Din US> 

70 GOTQ fO 

e^i FfllNT -TflU Cfl+INOT RET AH lFfl5 ThWN 0*ff flR HOfiE THfltC THtEE AB*IBEH9*'' 

?^ PflErjT ^HQU J^Affr HtlASERf M VQU UaNT ID AET M"; 

1» IflPUT Mt:[F Ml^i'STaP" THEK JJfD 

tlO i|*lJfiLlfl»h 

^20 [F il=2 THE* i76 

13t 3F 11-3 IHEH d40 

140 IF ll>j 9S H<1 THEN H) 

1f» PiriNr "UIMT NUHQEG"; 

240 IHPLr V 

211} IF V<-6 OR V>^1 TFfEA 2M 

24D PRINT "TflU CM OflLY BET (f# Ati INrfSEIT FRDH ME TO Sll." 

a^o Goro 1^0 

2^0 PRINT "^iLfiElt*; 

;2?D INPUT F 

2» IF F<=SOC DR f >pr THEN 3J4 

310 PRINT ""THE tfQu^E ilflIT 15 FJUIki II TO 1^00^" 

32D OOTD 2&0 

330 ensja is 70 

340 S2=llf33±F:90SLt 2DA0 

3ifl iOTD 32iJ 

370 PREJIT '(MAT TUO WJHBEAS**; 

3efl IMPOT VpP 

3f0 IF lt<-6 OG V^-1 OB F<-i OR P5<1 TH^M 440 

■140 PRI*fl "roi CAN UNLT lET ON AH KfTEOEfi FROM 0« TB ilt.^ 

450 BQTO 370 

440 pRtHi '"liABER DH >DTH"; 

4^0 IMPl>T F,| 

4efl IP f<^300 OR F>^l {lit K-S40 (Ht l>^\ THEN 530 

530 FR^HT -"THE HDUSE UHJT IS FROfl »l TO 4500. '' 

^40 OOTIJ ^Afl 

550 enSJJS 1870 

540 SZ-l|]G3«PtOOSllB :»0 

570 S2=PtS3i|lOOSlli 2040 

5fO ODTO 3240 



dOO 
410 
£20 
iTO 
?*0 
?10 
7?0 
7J0 
fiOO 

ezo 

830 
040 

850 
070 

Te70 

iseo 

1B?0 
1M0 
1T10 
1TZ0 
T¥30 
1»4fl 
1TS0 
19&0 
^OiO 
2070 
30BO 
30fO 
?]i>0 
2110 
2S!0 
2UD 
2)40 

2340 
3300 
32; 
3280 
3330 
3340 

33flO 
33fO 
3410 
3440 
Dt 



S>"l TWEfl 710 
ONE TO SU,^ 



Qft J>-1 TUOI ^20 



PRINT -MAT THREE IJUNBEEG-; 

ENPUT V^fpS 

IP U<-i OR V>-1 OH P^-4 at P>:*1 OR 5<"d Ofl 

PAIHT ^TOI> CM ONLT 8ET Dfl AN INTEOEB FRHf 

CO TO 400 

PRINT -UA&EP ON EACH OF THE THREE '': 

liipur f,[tJ 

IF F(-300 OB F>=1 DR 1(-!D0 OR I>M DH J<-100 
PRINT ''TKt HlllSf LiniT IS FROH }l TO *100-»* 

■tOTO 730 
003 JB 1870 
S2="V:53-F:C05UB 2flt0 
^?9F-Sj9l:S[]S[IB 20&a 

aj^^^s^s^JsODSje 20A0 

eOTO 32^ 

J=-1 

A"InT C4*R#IICt J^l I:B-[HT(i*flHK 1 ^41 J iC*iriT14»IH11I<1 )tT k 

S[]^=>A:SC29iRiSC3h<C 

FOB T^l TD 2 

FQR 1=1 TO J-T 

IF at>K>S(T + 1) THEN ^?40 

T£-S(XS:5U5iSa+l]ia(X41]iiE 

KEKt XJifEIT T 

P9IMT -THE LUCKl 4KJHIERS hKz 'SUI;SI2';B13^ 

ECTORIf 

C1-0 

IF S2'A THEN C1=DI-^t 

IF ii^i THEN CI'CHI 

IF S?-C THEH Cl-Cl+I 

IF CT>0 TMEH ^130 



53^S3»t-1J 

PKINT '^tlllJ LOSE OHi *^W;eCITI3 2150 

53>S3*C1 

PRINT nOU HJN ^^Ci;" TIHE3 GMi^S? 

RETURN 

JP U-O EltEN 

IF ll>D THEN 

IF ll<0 THEN 

REA 

fRINT:PR]ATtPEINT 

IP U^O THEN 341» 

PRINT *rDU DIOil'T V:H Ml HtM£t^ Ul I'H VlLLlRa 70 I^ALL IT EVEJ|1 

aOTQ 3440 

PRINT ^rm UDN EKACTIT 4^;U;"H NOT lAI i^F" 

ENIt 



PRINT 
PHINT 
PRINT 



■TCriT-'RE 

♦'voy RE 



EVEH^'VPfflHTsDOTO 90 
iiHEAD ■''!UiPRlNTi3l?T0 fO 

lEHItfl r;Vt PRINT ^SCT[1 fO 



rOU UMT TD CASH In ^0^ CHIPS, I 3E£l M** 




Binary 



Thfs game tests your skills Jn bmary- 
to-decimal and decimaNo-bj nary con- 
version. Vol are gfven twenty conver- 
sion irials. Numbers are chosen 
randomfy and your score la printed at 
the end. The answer to any conversion 
you miss is displayed- if the next 
conversion is presented, you may 
assume you got the previous one 
correct 



There are seueraJ possible 
modifications lor this program such as 
timing the response, allowing the user 
to specify the number range, checking 
for duplicate numbers, or extending 11 
to other bases. 

This program was written by Tad 
Park of Pacific Union College. IX 
originally appeared in Crea1i]/e Com- 
puling. Mar/Apr 1975. 
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SlifAfcT 


;119[^0 


aEC!Hri^L±^ 


24 


^CNART 


[101^41 


HEClMALt? 


17 


ERAfrs^lOII 


fletlrtjlL;^ 


11 




DOUO 


HtJ^lMLS? 


10 




F^lO« 


neciNfiL;* 


1J 


flJ?JftRT: 


01 rou 


BEClHflJ.;' 


1? 


BIHAHT: 

i? 


100411 


C^ClftALl^ 


1^ 


Bl'frtftr: 


[>E010 


IiEClrtJlLi? 


to 


flErtftlTy[' 


5UIJI1 


BECfMALtr 3 


22 


rono 


IiECl?*riL:1 


24 


KCatkii 


. 7 


flNASr.^ 


7 111 


I^FClKi^L: 


15 


£IHi=ii^T± 


? 1111 


SECIflj^ij 


1 


ElMilRTi 


? 1 


CEj:riiiiL: 


ie 


BTPfflSY] 


' 1MJ^J 


AECIHALE 


? 


EIXAFl^: 


' ^100^> 


BECinAL] 


11 


B:HAnrz 


■^ fcur 


ErfUftALi 


f^ 


BlriAHT; 


' 1111 


DECIMAL : 


u 


BimRlL 


? 11(0 


DECiWL; 


23 


UUARff 


? 11 HOI 


DECliiSJ.: 


4 


Bl»MRrt 


^ 01 


Tnrft ^coiitt 70 1 







ui: 



L13T 

ID paiNt Trt^raokj-BTiiflRr- 

T^/Bi^uJ!^^"^^""^'^^"^^ ""PUTINS WGRTgiJii:^ >£u jEflSEr 

T?o rc^:o 

130 PRiNJ 

no ^ftj>*r 

150 fUR [Ti in ID 

I4fl QJ13UB HO 

i:0 PJIINT -frNARYi- 

IftO FOR J=F ro 5 

190 PRIrfJ- ttI[^^^Bt,BU^ + 1pll: 

2B0 *IFXI J * 

21^ F^INT ■ DECm^L:-: 

320 JM^l^r rt 
2JI) If A-Jl TWEH Zift 

?50 Tfl^TO-l 

2iiO PRINT 

2?i> NEXT I 

;ZBi> PR!ffr 

2?fl fS[rt7 

JOO fOP I-l Tfl H 

3E4 ga^UH 5^Q 

J?0 PfilHl -DECIHAL: ■;d; 

3J0 ?ft|»fT - JIHflUTi ■; 

14Q ilz"00l^0^- 

J30 liJPtIT II 

340 If L£N[TSJ> It JJiErt fjfl 

J?i> Iti-0OD0l}-*H 

3?^ i*=nfa»fr*c;ip3? 

Jli] r&R j:=i TO 5 

J?fl ff rtHJ»CB1.£(J?tl,15<>Jirptri4.J-ij Tritt^ q-^0 
4^0 NtXr J 

410 &0TO Iff? 

42U f-ftEHT " "i 

*S0 FDR J-l Tfl 5 

4^0 PfifNT rtIIitlB».ECJ>+Mf; 
430 weXT J 

440 PRIhr 

4?D 1U«T0-1 

*Ja r(E"KT I 

Jflfl pfiiNr 

320 PRIJil -TflU* 5C0R£r;iHTCTi)/.>.5J:'^3" 

3J0 PRlJfr 

^4^ PRINT 

550 £Mp 

S40 B=Q 

3?l| FDR Ji| m 5 

5B0 flCJ]']#iT(J^rtIIUJ*.3J 

6V0 NE£T J 

dlD FrETURFf 

Gl 
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Blackbox 
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20 


^ ~ I 
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r ! 
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J 




r 

1 

■ 1 

1 
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i 
1 — 
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6 ! • 

i _ 


i 

^^ j 
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1 
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Descrlprion: Blacli Box Is a compuierized version of the 
game that appeared in the August 1977 issue of Games 
and Puzzt&$. The Black Bon Is an e-by-8 square ir which 
several aloms are hidden The object of the game is lo 
discover Ihe positiors of ihe atoms by projecting rays at 
them from the sides of Jhe box and noticing how these rays 
are deflected, reflected, or absorbed. Rays enter Ihe box 
across one of the tour edges and travel horijontally or 
vertically The entry points are numbered from 1 to 32, 
counterclockwise, starling at Ihe lop of the left edge 

To play Ihe game, you firsi specrfy how many atoms to 
place In the Black Box. Then you type in Ihe point at which 
you send the ray into the box, and you are told whelherthe 
ray was absorbed or where it emerged. Type a zero to end 
The game and pnnt the board. The path of Ihe ray is 
governed by the toUowing rules; 

{^) Rays Ihal strike an atom direclly 3tg absorbed. 

{2) Rays thai come wilhin one square of an atom m a 
diagonal direction (so that they would pass next to the 
aiom if ihey conlinued) are deflected \>f 90 degrees 

(3) Rays aimed between Iwoaioms one square apart are 
reflected, 

(4) Rays that enter on either side of an atom on the edge 
of Ihe bOh are rellecled. 

(5) Rays olhen^vise travel in straight lines. 

The game is prelty interesiing wilh four or five alome, 
bui can get oul of hand wlih too many more. Occasionally, 
an atom can be masked by others. This doesn't occur 
oflen. but sometimes the position Is truly ambiguous 
(more often, there Is only one place the atom can be). For 
competitive play, score one poml for reflections and 
absorptions, Iwo for rays which emerge from ihe bo>i, and 
five points for each atom guessed incorreclly. 

This program and description were wntien by Jeff 
Kenton. A previous version appeared in Cieative Com- 
puting, Mayyjun 197B. 




1fi 



HUti 



CfEflTIVE COHFUTIt^e 
nORRIETOUB, N£U JERSEY 



MO. JIF ATQns? -4 
RrtT^ T 
e^eSJTRBETl 

Rfli"? 3 

TO za 

fiEFLfiCTED 

RflrT 3B 
TfT 13 

R^T^ 2d 

RflrT 7 

RjiT'? e 

TO 15 

RftYT u 

NUU TEU B£r UH^Rf Hfl YDtf THittK rhf ftTDftS AREr 
CI« rrOlfrCOLUHJ* fORttflT PLE^IEEJ 

ATOM I 2 ? Ipl 
ftTQJi M 3 ? 2h? 
AfOff II i 7 7,S 

. . • 



ran fllJE5SED 1 flUT DF ^ 
TOEJR ^CBRE FlfR THIS RflJlHL 
CflRt JB TRY flljfilN? TfS 



*TOFlS MBffECTLTM 
HA3 JQ POINTS* 



Hll^ OF ATOMg-* 4 

Te 1] 

RAT 7 15 

TO U 

FTUTT 1? 
TQ d 
RBTT 2i 

TO 23 

RAVI 17 

PflT? 31 
TO 1 

Tl> IB 
Rfln 

NDtf TELL ftE, ilHEfi£ CO TOJJ THINK THE AT0H5 flRE^ 

cm tnU^CflL^HN FORMAT PLffiSE.J 
ATQN « t ^ SpT 
AfDtt H : t 2^3 
ATD^ i 3 T ^^7 

ATOH I 4 ? a.A 



LIST 

ion PRTNT rABl25?;"BUCirSflX" 

PFrigfT Tfl&C20}^-tfi£ATiyE CDHPUT3H0- 
PtrNT TAB{lB];"riOftfISTa«H. ttEU JER3EI" 
FfiIHT:PftIJIT:pRINT 

DEF FJIRl2?=ltfHB»CWB(lf*1] 
PJIIHT "NO. OF ATOMS-;: TilPIlT Jf 

FAR J=D JB 9: Fflft I-U to 9: Ba,JJ = ft' NEXT 
FQfl I^a TD H 

^=FJfRll)s r=FNfiCII= IF B[X,¥J<>fl THFJt ISO 

Bt^pTJM: ifEn I 

SiO:[:=fl 

PRINT -PfiT^: JNPUT Rt iF ft<T THErt AB<\ 



130 
120 
IJI? 
1441 
150 
1^0 
17i> 
ISD 
T9C 
200 
210 
2211 
23C 

240 

7£{l 
270 

2 BO 
2?B 
3011 
3^0 

320 
31l> 
340 
350 
3^0 

3 BO 
3^0 
^00 
4tD 
420 
430 
440 
^50 



IfJ 



GOTO 2A0,7i^r26i\^:i7Q 



470 



5011 
510 
S20 

trso 

532 
535 
5<D 
S50 
5iO 
3^0 

5^0 
dOO 

dio 

420 
0^ 



BH rR-ij/a^i 

fRIUl "ERROR" t ODTB Zl^ 
1=0: TiR; U = it 1^0; SlJID 2S0 

):=9t l'=25-ftc U=-(: V=0: liOTD 2S0 
i:"33~R: "r^^Js U=Oc v=i 

xi=3:+U: u=uv 

IF U=0 THEN K2=X1^U Xi-S]t]= T:.Tr: r3"t1= OBTO JTQ 

V2=T|-I: ^Ttti^I: Xi=X^', tJ-KI 

SUpSr^lii^y^'^^*^'^^^'^**^"-"^*! «0^» 33Or340,35O,34{ 
PPINT "ABJOftEfB"tS^S-*t; QnTQ 210 

k=j:tt T^TI: ooto 3ai> 

l'}i GDTJ3 3A0 

Z = -1 

[f U=0 TttEN U=Z: V=0: ijDTff 3a(l 

ON (K+E^Jj^a 
STOP 

DJi Cr+15)/e QOTfl 440,2Sl)>S0 

^TOP 

?=V: BOTO 4iO 
Z-25'V: Oarp 4d0 
; = 33-i:: ftOTfl 4il| 

IF I=R THE-N PRINT "REFLECTEB" sS^gtl : GDlD 210 
fRIXT "Tl>'*Zi5-S#!i GQID ?]0 
PflINT "NJlLi TELL ME, UHERE DO 
PPINT "CTff ROilpCOHIflN FOPftAT 
FDf flap TJl tf 



BDTD ^;:0p^l5a.13fl 



TOtI THINk 
PLEASE. 5" 



THE rtTDHS ARll*' 



fftlilT '^fltCltf H '-a; 

INPUT IpJ 

IF tHJ.IJOl TREtt a-S*5:fiOfO 54il 

C^C*T 

ffEJIT D 

PJlliir: FOE j-^t TO e± FOR 

tF Btl, JJ=0 iffEtf PHJMT ■■ 

PRINT ' *"; 

^tXJ I: PRINT; H£U Jj FRIRT- 

PRIKT -TDtJ QlfES^ED "fC;" Q^JT BF 

FfiINT "TOUP aCOfiE fOJ! THIS RDUJfll 



I'l 



Ti3 e 

GOTO 



JSO 



INfUT 'JTrtfrf TO 
IF LEftiCrtJ.I) 



Tflt 



THEfl PRIHTiGOTQ |50 



"r^\" rtTflfta CDftR£CTUM'^ 






TBU QUESSEH 2 OUf Of 4 
VHBR BCORf FQR IHTS EBUtfB 
:AftE TO TRr jlOfllitt |#o 

Dt 



ftlQJlS COfiRECTLS"" 
OAS 24 PfllRTS. 
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Bobstones 



The idea for this number game was 
derived from a contest caHed 
"Bobslones" described in the novel 
Waiership Do^n. The object o! 
Bobstones is to guess three things 
about the roll of a pair of dice. 

1. If the sum of the dice 

is odd or even, w-^ 1 point 

2 The 5um of J he dice 2 points 

3. The number on each 

of the two dice 3 points 

The winner is the first player to score 
eleven points. If a tie results, the winner 
is the first player to break the lie. 

In this comp jlerversion ot the game, 
yoii are playing against the computer 
However, the computer makes its 
guess before the dice are "rolled." 
Hence. 11 has no real advantage over its 
human opponent. 

This game was wntfen by Oohn 
Addleman, It originally appeared in 
Craative Computing Mar/Apr 197S. 



hi IMII. 

-» an THIS HlftL QF THE ttftE, THE T^O HUHIFRS flFE 
p<» IHE im li i - 

dl &IIFS1 [5 flflr THE ^Oft IS EtfEN. 
AA I fflCHI D' intOlfa* l^lOKt 

ni suEss OF ?KE sm li l? 

HI 1 »i&NT m uhqivc' bQROiie 

//f TTPE THF MRS -RUHV flit THE UDHB 'UfiOHfi-. 
411 1 tiaXT Oir Uffl^B* UBDHS 

Ttf SCQIfE IS "E < - imj 5 . 



Tsur nurn- 

IS THE Smt 091 OH fiJCH' EUEK 
tOU *ll£ CifPPFCT. 
HfiU. BUEJ^ IHE SUItT 17 
Bfltrm. THE SUA IS 10 . 

NT TJim, 

>fP OH TWIS IH31L OF THE BICEt THE l¥ll KUfHEBJ flIfE 2 

"> IHE sjn IS « - 

KT flH&S II IMl THE ^U" IS DID- 
an 1 HI GUT on UrOHB* UltDN6 

THE BtDtE II HE 4 - '"JU I - 

nut TUBH. 

T9 IHE sun IjriTI OR EVElT' OK 

VDU niTE GOflCC^T- 

HIU, fiUESS IHE SCIh? 3 

samtT, r«f 3BH is ? , 
nr lufH, 

.<■ OH THIS FI1H.L at IHE DICE, THE lUO UgHKPS ARE I 
«>< 'HI ^im IS 3 . 

HI EUESJ IS tHAt THE jun IS aui. 

All I HISHI OR UlTflllB? ITlMT 
Hr &IIESS Of IHC 9UH It T 

Att I IT E CHI DS mtOHQ* UfTCrfQ 



3 AND J . 



flHtl 4 



AHE 



J , 



nun 



BQKTONES 

CFtEAlIVE CQnPUTIHH 

POItirirOIIH, NFJ JEHSET 



THE SCNE JS HE ; - TOL) 7 . 
tmtl TUFtK- 

is THE sun oi£ an eucht ohd 



mis ES H HOhBEl BAHE CflUED BOlSTOHtS. T« DBJECT W 
BOIETDHES IS TH BUESS THBEE THIIfQS ABOUT THE WLL OF * PfllR 
OF DItE, Dll EACH TUtH, THE CDlPUTES SHUiA'CS THE ffOU (JF 
THE BICE. THEH. lOU Olf 'HE CDhPOIEB ITQIJA OPPOitEHIJ 6UESS 



A OHB 2 



1. IF THE SUH OF THE »[CC 1^ OBB DIT EVEH 

2. IHE SUA Of THE BICE 

U THE HiniBfIt OH EACH SF THE tUO BECE 



Bciue 

1 PflJHT 
7 PtlJHTS 
3 POIHI? 



IHE UlHVEt 15 THE FlH^T fLalLR TO ^CWE 11 POIHIS, If * 
TIE BE50LTS, THE lfT*HEB IS THE fUST fLflTE*! Ftt fifiESK THE TIE, 



11)9 FlISI QH BET HE 

TBOFt TUriT' 

IS IHE aUrt ODD 3ft EWFIf OBD 

SORBf. IHE SUH IS * ^ 

HI mBH. 

-« DV rJllS ROLL V IHE &[CE, THE lUO HlJrtB£R3 «£ 4 4HL 

■1 THE sun 13 B . 

hi BOESS IS THAT Trt lUH IB FfllH. 

M I irEBHT OR UJtaUBT ItlOHl 

ni eUESB DE THE SlW IB B 

AB I fllBHI or UROVQ* BIGHT 

HI BLESS ES T1<4T IKC hOn^ERS iBffE 3 MV 5 ^ 

AA 1 RIOHI Q(r HBDHOT UtOHB 



Tl£ SCORE ES HE 3 - IQU t . 

iGtltr TUIV. 

IS THE SUH ODTl OR EVEFT DO* 

9oirRi, IHE SUA IS e . 



J AHB 1 



ni IIRH. 

-•• DH THIS RULL of the dice, the TIN) HUHEEHS 4FEE 

»> IHE sirn ES B . 

JIT SVESS IS mHl THE 3UH 19 OBI. 
AA I RIOHI OB OI'ltKg'r UMFfO 

THE aCO*E IS HE a - TOO Z . 

Yitit Tin», 

IB THE SUH ODD B(t EUEJiT EUEH 
TOO fiflf fUCRECT. 

HDVp bUES^ THE SUHt d 
EORBT, THE SUfl IS 4 . 

HI TU'H, 

•» DH THIS ttULL OF THE BICE, IHE lUO HlIltBERS ARE 

»< THt SOH IS ? , 

HI BHESt IS IK»I THE SUH IS DBD. 

AA I BE6HT DB UBOHa-* RIOHT 

HI QVES9 OF THE SUrt IS II 

AH 1 BlUHf OIL UtlOHOT (WUHO 

TBE SCORE 19 HE d - mu i . 

LIST 

It fRIHl TAl(24Ji-BfiB&I3HE3- 

7* PRIHt IAB120);-i:B£aII« COHFUIIHQ- 

3< PBIHI IABC1B];-H0HRESTnurf, HEI' JEBSEl" 

llfl P(l[IIT:PR]iir:PlltHT 

1(0 FtriHI - THIS ES A UtinBEJI QVIE l^flLLEB BS^SiarfES, IHE QBJ£i:J OF- 

15» PRIHI "BOBBTBHES is TO SUESS THREE THiHOS AfttUT THE ROLL Of * PftlR' 

Ifti} PRIHI -OF mCE. 0" E*CH TJRH, THE COIfPOTEi; SIHULAlES THE HOLl flf" 

1^0 PRIHI -THE [lICE. IHEl, lOJ QS THE tOHPIJlEt nOUfi OTPOMHlf HIEBS- 

tBO PHIHT 

IM PBTHI 

30t PBIBT 



- I. IF THE SUB DF THE DICE [S QDB OR EVEH 



SCOPE" 

I PUIHI" 



220 FUlHT 

2S0 hum 



2. 



'TZE 



TtlE 
tHE 



SUN HF 



TWE BICE 

ON EAI^h Of 



riff 'LO ItlCE 



THf UrXNEff 15 THE FIJtST fLUlf TB 3C«?E 
P£$11LTS, IHE ilKHftf 15 THf MPS! PUI£R 



11 
10 



2 PBIWT?' 

3 POI FITS' 

PBJWIS. ff A- 
BltEAi; mt TIE. 



fiO PfrfJT " tQlB HICK I- 
370 lEF UmilfxiNJIitimiiDM) 

2?0 l£I *(|)=0 
3D0 LEI ili7l^« 

3Tl> LET 21 — 1 
32D LEI ?^— 1 

aao lEi zsE-i 

340 LET Z*=-l 
355 tET Z3=-1 

3Al> 1.EI JI-9 

3^fl PRIHT 

3911 PVIIf^ 

3?0 PRIWI '-JOI] Fllt5r DP rtE": 

<Di> IH^in li 

11& TF Zl^-rnu- IHfN 450 

«0 iF ^»='(IE- IHE* alD 

4iC -^// ITPE TUf UOIfD ■rem' Bff IHE UQBli 'ftf' " 

446 GCTD i?0 

iSa LET Jf'FIIBf?!] 

4A4 IF Jl=.t IriFH 4» 

*7i| LEI Zl=ll 

48CI LEI [i:«F«15> 

4»0 LIT S=[H-'|i7 

3IHJ IF JliO ThE* dSC 

310 If zio'nE- iMEH sai> 

UQ IF ^21M> THEW HiD 
5 JO PHldl 

540 PilNt -THE SCORE IS Hl-;M2f," - IDU-'flfl)-- ■ 

ajD If fi<ri;=ii mta iasa 

5fl* IF il(2)J"ir IN£N T?l}e 
1^0 GDTO i7li 

5(0 If ZKJ-fQU- IMCfl ?1I?0 
5?0 if J?Ol THEN 670 
4U0 PRIIfT 

410 mJII -THE BCSBE IS tOU-fftCIJ;- - JtE":fl(2)r " 

4?o If fluf>=ii THEH im ' 

6ia IF flf5»»|| THEN l«0 

aj& LET jr^-i 

440 IP il=-Tl3ll- tMEU 1 1«0 
4 JO Pffltfl 

480 Pinill -rOUB TIWH." 
i?S LfT J3=f 

i'HD 1.ET P=S-(lNr(3/3>-IJ 

i-IO PRIUI -IS IHE sun OBL JR EUEIf'" 

7?0 IIIPIfT ftl 

710 If SI--IJIII" TUEtf 770 

i'^l IP fi« = -Eli£N" TNEIr 805 

??* PRIUT V// irPE THE UOffJ> "ODB' BR THE UOITB 'FUFll' - 

7*0 GOTO 7rO 

7?i If t'l HEW fljij 

7ffiJ PRINT -BDRRr, THF Sljfl IS-'Bl"." 

'T* 6DTD <5I> 

800 IF p=0 THE* H20 

910 QOID 780 

H?0 PdhT -lOJ flPE CCRBECI." 

BJfl LET flu J=flfl^H 

840 PRIm -(rtU, GUfSa IHE 3tfl-i 

830 IHfUT 01 

aao If Ql.2 THEU 890 

e^O IF Gl)13 THEN SH 

ai*t EOID VJO 

flO If Q|=S THtH ftt\ 

930 PdiT -SOFTRT, THE SUFI JS-iS;-.'^ 
930 BOIB «o 

940 PIflJII -mil fl«E COHREtT,' 
¥S0 LET AM]<Af1>il 

'" inpI! hTT ""^ '"^ ""' """""^ """^" mDJCE* -is;- 

'BO If did THEN 1030 
9»fi IF NJd ThEH I03l> 
IttOO If *||>i THfN 1031 
1010 If ll?>i THEW I0J8 

ftm aoTQ 10J0 

laJO PRm -/// THE NllHBERa flUST M BETBEEN 1 fltfB d - 

1"0 aoIO 94fl 

iflso If irriBi iHEn info 

lOBO If N2<?1 IPEH 'IfO 

TOi'O PRINT "SOItRr, THf rfUBEERS *RE-:ri!- flHll"-l>J 

IMO fiOTD <5IJ ' 

1090 IF »3^|i? TBEIf 1 Ijfl 

1100 GOTO 1070 

1110 [f «1=02 THEN 1130 

M20 SOTO I0?V 

1130 fRlfll -rou flPE CORRECT. - 



TI40 LET flnj=flf|>fl 
"1150 BQTO 450 

nao tfi jj=o 

1170 PRINT 

11Q0 PRINT "IK ILfRN.- 

1P90 mm --" Qtf THIS HDLl OF IHE DICE, IrfE TlO iJJHKP? " 

nP5 PPIilT "WE -;[H;- 4|l[l "fH?:"." 

'?00 PRINT ""- THE GUIl IS ';5',''.' 

lilO LET flT = IWT£!-pJflnn"|J 

1220 IF Z7.IJ THEN 1345 

'230 LEI I3=l\ 

1240 If flT"1 THEIf 1370 

l?50 PfiiNT -HT 8UESS IS TWftT IHE SITU IS ODD," 

r!ao gCTQ fjgt 

1370 PRIHT -*IT GutSS IS TUflT THE iW l9 EUEM." 

1^80 FRiifi -flu I fiGHi Ofr uitaifa-: 

iz»o ijipur as 

1300 IF D»=''RIEhT- INEN I310 
1310 IF |l|"-UI!ONB' IHlN 450 

'320 PRINT -i// TTPE THE hOHB 'RIBHT- OR IHE iHjtB 'URONO' " 
TJJO GOTO 12flO 

1J40 LET fli?l<fl<Z]'l 

IHU If fli-l THtH 1410 

13i0 LET BI=INT(S.fiNIIIlf.1J 

1370 IF Z3.0 THEII 1390 

UaO UT Z3=0 

1390 lET S2=B1-B1*1 

I '00 amo Hjo 

mo LEI BlifUfliO] 

H?0 LET B?=il-'BI 

1430 PRINT -HI GUESa OF THE SUA IS "^B? 

IMO FKIJIT -fli I PIGHI OF UBDNG": 

H50 IJtPUT Ot 

HfiO If Uli-Ri&HT- THEN 1500 

T470 IP li» = -UR(lNfl- THEH 430 

I'flO PRim -f/i liPE TNE JJOITE -(TiaHT' OP THE IfORD "UfONO' " 

J490 GOTO 1440 

1500 LET ttt2i'lti2l'2 

mo If B202 THEN T5&0 

TS20 LET Cl=l 

1530 LET C?"1 

1540 fiDJD IB10 

1J50 IF &2;>3 JHEJf 1^90 

1^60 lEI Cl-I 

1J70 LET L3=2 

1500 iQTO ISTf 

T590 IF 13011 IHtH 1430 

1400 lEI t1;3 

1410 LfT [J=fl 

i4?o aoTo laio 

liJO IP £?01? THtN Ifi70 

1fi40 LET C1"fl 

1450 LEF C3=6 

lAiO GOTO IB10 

1470 If iiW THEd 1740 

uao LET i:i-i3'i 

1490 LET E1=inr[KlJPIILflnn 

ITOO If Z4"0 THEN W2t 

1^10 LEI 24^0 

J7J0 LEI CJ=B2-C1 

1730 GOTO leiO 

1740 LET i;i=B3-4 

1750 LET K3=KI''1 

1760 LET «?"?-f:f 

1^70 LEI :i-(IHTf»!?-PNrHK1J*K3l 

17B0 IF IS'O IIIEN 1800 

T790 LET 21?0 

1800 LET C?.B3-C1 

IBIO PRl^T -Nr OltSS IS THAT TflC NOflfiERS fllTE -:CT- flitD '■£2" 

ib:o piiii*T "fid I piGjiT OR utoao- 
laao iHfuT M 

1840 IF B1»-RIGHT- THEIf ISSO 
1(50 JF Oli'RFrOHG" THEl^ flSQ 

laao LET fll3)=fl(2h»3 

1S90 HQTO 430 

ItOO IF ilfl JOfll3) TJlElf 1930 

1TI0 If J^<^o ihev if4o 

19J0 OOIO 470 

l?30 IF fl[l)>fli3h THFW 2030 

1140 PRINT 

l?50 PRINT -I lISi ftHOIHEB BME": 

JfflO INPJI C» 

1»7D Jf Ct="lEg" THEN 2T0 

I'BO If C1^"ND- THEN JQlO 

1990 PRINT -/f/ ITPE THE UOFD 'TES' ON THE UORL 'UQ',- 
2000 ODTQ T940 

2010 pRim -SEE IflU L*r£R.' 
2lJ?0 EHB 
3030 PRINT 

2040 PRINT -rail U[NP nNDTHER SfihE"! 
2850 BOTO l9jhD 



Becce 



(nm 



A 



ThiB program simjiates (he Italian 
game of Bocce also called "lawn 
bowls" or jjsl "bowls " 

The Instruclions starting at the line 
1770 e;<plaiii the game. 

This is (he four-ball version 10=5). 
Allowing more balls in the game 
{raising O) will increase central 
processing lime since the chances of 
collision win rise and the resulting 
position of each ball has to be recom- 
puted. However, the delay Is short and 
we routinely play six to eight balls. 
Increasing Q beyond 9 will require 
redimensioning the arrays at line 1030. 

When there Is collision, the bell will 
sound {line 1500) 

H is important to remember that the 
object isto get close to the jack and not 
to hit it. Upon collision, the jack will 
move off more quickly than a ball 
because it is smaller and lighter. A 
careless shot can turn a good game 
into a disaster. 

It requires some imaginahon to play 
the game well. It goes beat if you 
imagine that you are standing at 
coordinates 0^0 and are looking out 

along the X-axis. 
This game and the description above 

were written by Victor Bendall of 

Eastern Kentucky University. It 

originally appeared In Cfeative Com- 

puUng. Jul/Aug 1977. 



meet 

C(t»IIVE ConruEluC 
lOl4ltlETOIin M£U JfUFT 



IHIS OllE SJHULATCE IHE QtK Of LItJH IDUL? 

DO 100 VEED IKSTItlJCrEDllGt fHTER ICS OR M' TES 



II TIE JliCIl K POSSIBLE. 

ME llflOKtED 90 IHfiT THET 



I4LL5 SUCCESS Ti/Eir AT 
OBJECT 1$ ID an THE 
IHE IfilLS AEC 1 

roLL iir t cimv[ 



PDLL. THEN fiT RK HHDIE TD THE UVE FR01 TDU 
TD THE JACK AT CflQPII»TEE f.l, ik fOSlTlVt 
IHE B4LL com GLDCKbiaC. A ■TEGIUVE ANOLE 
HITC-aOCIOlSE. IhE JACK IS A < CI V|Df AlfD UILL 
STflAlftHT IF VDU HIT ir. BAILS ilT BT TOUP THffOtlW 
CVrV£ IH EITHEr B^ECTLOh. 



A lAPQE' 

BALLS AS CLOSE 
CH IV DIAPEIER AflD 
lOU HILL HHUE TLI 
AT CODffjriFMIES 0,1> 

ahijle hill iaiee 

UlLL rUHE V COFlUE 

itai.L 
GfltL n't' 



nidi, mr ah inniAL irtictAif of mb IiNd an ahole di si 



THE JACtr IS LDEAICB AT !1?l 77 
tALL i 
VELOClTir 9D0 
AV91E' 10 

JACK AT CDUflDllTATES 2171 7? 

AALL 1 AI COQABIVATES 24J4,A3 -*'f*^2Zf 

TECHF OntB 2fi FEEI AUA|i 
LOIK A"B 10 THE tlGil 



]T IS «?2.I37 TROU THE JAtR 



BILL 2 
VtLQClTT? 
HtllT t 



4M 



Ma AT COQIBLMTES 2171 77 

»ALL 1 AT CQDKDI HATES 743 4. dj -4^.23? 

BALL 2 AT CODRDIKATES 2743.71 -4».?j? 

lECh! OVEF 17 FEET AHAC* 
LIHB All Ta THE BIBHT 



IT 
U 



IS 
IS 



422.137 
530.474 



FBOK 



T1IE 
THE 



JOC»f 
JACX 



BALL 3 
UELOCirTT 
AHBLET J 



AOO 



JACK AE CflDttDMAT^S 7171 77 
BALL 1 AT CD0BB3HATES 2434-43 -4T4.23V 
1ALL 2 AT CDOVMHATES 22<3.7l -4».S3S 
BALL 3 AT COD'BlllAlES 3504. 1 3 -710.749 



IT 


i; 


£?;,137 FR(M TNE 


JACK 


IT 


JB 


iZi.^7i FifOli THE 


JhtK 


IT 


IS 


1342.f3 FKOH THE 


JACK 



TECHL DVEt » FE€T iilMTi 
LOMS MD TO TH: VISHT 



VEICCITTT 



304 




JMCE AT COORfilHATES 71 71 ?7 

BALL I ItT CaORDIHATEB 2434.^3 

»LL 2 IhT CQQHUIflilTES 224 1.? 3 

BULL 3 AT i:OCrFt:iTriATES 350frJ3 

tmi 4 AT J^QDftllHATES S7A.32B 



TtClfi 
SriDftT itHD 



OVtl 41 FEET AUAT^ 
TO THE BIGHT 



-4f4.239 
-4SS.33S 

-71&h74B 
-17S.I^3 



II 
IT 
IT 
IT 



[S 
IS 

IS 
IS 



SJD.47A 
1J12.A7 



FRDU IHE JACK 

FGQH THE JAClT 

FfTQH THE JilEh 

FBDH THE JACK 



THE TOTAL DTSTAriCE OF AU IALE5 FPtQK THE JACK TS 404fl,;3 CH 
a<H T FLAT THIS »AnE fW HOriETH 

CAKE T9 TRT A6AINT U1£K TES OR HOT PfO 

CK 

14 



L13T 

10 PfflMT T*B(f3J;^EaCCt- 

JO PRINT TflBfl9>|"CREiTiyE COMfUTJNfl^ 

3l> PffHJ TflBU?l|"flaFrpl5IBil*rf NfU JERSET- 

« PftENT:PR:NI:PJrlHT 



Ult 

IflJO 
ID JO 

to?o 

1(91} 

fill? 
1121) 

nso 

1141 

T1JS 
1E55 

ntci 

1U5 
f]7i5 

iiei> 

1t?U 
12D0 
1210 
1225 
123U 
1?32 
12^0 
1250 
T2i0 

i:?i> 

liT5 
1300 
1^05 

1310 
U15 
1320 
I33CI 
13^0 
TJ30 

1370 

13E0 

TJ?0 

1401} 

HrO 

1420 

1^30 

t^1o 

1^5 1> 

1^60 

H70 

ElfiO 

l4fD 

I5i)0 

1510 






;?t 



a=3 

nJHJ -TJIIS Mr*E SIMULATES THE CflilE OF 
JilPifT "DO YBl NfEO IJfSTRlCTiailST E«TEil 
Sin itCS5,&lf^>^DC?>,^C9?^^tfj^r^?J 
PRIHI; IF rt--rE5- IMEN SOStJB 1?7D 
fl^3.H159 
S1=Cl;5?iO:ftr-^?^3 

Sn?.|ilT£:0O0+70O**NIl{1)]i ^C1k = I»T{5flO-400^fi«£M)) 

J'FiGQSUB ]5?0 
HEUT p 

foR j=; ra a 



IF 

IF 
IF 
IF 
If 
JF 
IF 



Ifl < 
III < 
DK2 

sa < 

D1 < 
III < 



a-2 

3*D 

i&*ij'? 

20*0^2 



'*lftGH]F[CENT BOULIflS" UHAl AH 



£1£U' 



FUR J 



IffEJ* FRIJ(r 
TH*f l?3lh 

THEN PfilHT-EXCELtEur llfT Cmil K BErTEfir-GOTO I^^O 
2 TH£H fRiHT -Bfl&B ffUT HEE&S 50HE iW^SDyEri5HT":CEirai23J 
2 TNEJI PRm *fftlfl - TOU NEEP PIORE PftfttnCE-iSOTB 1230 
THE*? PRINT -PDDH - IRT Tff BE KQfrE Ca«S19Tj^HT":aDT0 3230 
THEif fRIWr ^VDU^ &AnE tfEEIS LilTS Of lf[|ftK":GOTa 3330 



PJ-AT TN]3 GAAE FDR HOHEri 



^HJiR VEi OR ^a";*-! 



f TO Q 

BlJheO:B1CJJi&:&CJ5=:i 

VU]=0;^^J]=0:T^J^=0 
NEXT J 

?R]NT;IJfPOT -CflRE Tfl tRr flCflllfi 
FRIHTi JF r^-'VES^ IHE« 10^0 

K]^-?i) 

IF J«1 THEN KliO 

A1<**CDS{&CJ??tKUCOi{CPt/25^9(J5) 

ft2=fl*SLNftU])^kl*5IHC{P1/:j + BCJI> 

SJ-V1 J}*COS reu l J*. Olt] .25EH)3tfll 

S4=yU]fS]NfE(J?^^.054j,23E-03:tri2 

B[J>^flT*tC(^U?*SI«CB(JJ]+A2*.05l/<^^|J>tC05fB(J)HftT^.03)t 
3f BIUK fl THEN S4 = -Sfl 

IF J=| TH£N |J7(i 

FOR*^^'"'^^^^^"^^ fl«» JlB5<ii-Tt1SK7 THEH N.JiG05UB 1550 

[F K = A DV J<K)-0 iffEil MOO 

IF ^B3fB5-nK]K U AJlD riBS^Si-i^KJK 10 fHEH ED9ue 15&& 
JIEJit ft 

IF L^CJ^ilBSCJit.DSh TrtEX 1440 
VCJ]»l'(J)*ifl4,ci5J:S]=55cg2=si:ii[jTa f290 
GOTO I2?0 

;(CJ?=XU?tS5: rt;?-rCJ?+Bifil=il:S2^0;55=D:SdBrt 
FDR LH t(l (1 

If ^JCL^>ftfi5Cllt,l>5^ THEK J«L:G0T0 13?0 

Ba^iOzLiai^O 
flEilT L 
CniB 1630 

B1K>=fllH[CftK5-52)^:^t^^-51?^: ffilfll CHR*C7^■ 
JF J^l TtlEFC V(JJ"yfJ]/5 



1520 
1J30 
1S40 
T350 
ISAH 
1570 
I^BO 

1400 

UEil 

3j?0 

liJO 

1410 

1A5B 

165S 

If^O 

TiJO 

1475 

1490 

UVO 

17011 

1710 

1^20 

17J0 

t733 

1740 

i?4a 

17i0 

1 756 
17i0 
17i5 
1770 

1^75 

i?eo 

1790 
IBOO 
1BT0 
1^20 
le3i) 
ISM 
1A50 
15*0 
1B70 



UNl=flBSrUfJ)*giN(HJ>-B^Rjn:U(KJ*flBSi^U]*i:D51((JJ-fl[KJ>) 



IF Kir 

17 J=1 
RETORH 
PfiliNT ' 
INPUT ■ 
IF VU) 
IHPlIt ■ 



THEN 
THEN 






■5* "HIT? 



■BALL *;U-ll 
■UEJ.£lCITr;UiJ>tlitJ} 
? POOO THEN PflilT 
'AtffliE"fB1(J» 



■"JfLOCm TOO 



lf]flH*fQOTn ] 



If ftBS(nCJn> a» THFB PRINT "ftNOLE TU BlO'-caiQ 13?a 
PRINT = BLJJ«fllSlBlJ]IF1/1Qfl?BflOTO 1 2T0 
PRINT "JAiK AT COORBr*IATEfi "iXlIJiTfl] 
FDR Pj-Z TO P ' 

ii»(gQR[an?-r(rtjr2ta(]?-xtrt5J^j>w 

THfN Atffk^ 
iflLL -flB-nr'^ ftT 

FRGH THE JACK- 



IE B £ 
fRINT" 
PlrlJil 

NEo n 

PRINT 

IF 

[F 

If 

IF 



CGBfiWHrtTES -;j<J^l-r<H);- it la ";B[H1j 



TABn53;-EiCELLEi(T SHOIi 
TAB(E6»;"BCDB SKQOTING^ 



TRY 
OVER 



"r;B0Tfl 174Q 
;:O0Ta 1740 



"^iCOTD IJ40 

";lrtTCB(?]/jo.4Sh; 



>tF? < 10 THEN PRINT 

C^Pf < 20 TH£N PRINT 

tin< 10 THEij PRI^r T.^Bn53r"lflCE 

[HP]>500 TKEN PRINT TAB CS h f "TECH ' 
IF BCP? ? 500 THE« PRI)JT "FEET Allflri 
IF ^[P>>KCn THEN PRINT "LOHQ AM "; 
if np>< Ktl] TiiEN PftltfT '^SHQRT j^NB "^ 
IF TfJ»>JT<1> THE*f PRI##T "TQ THE LEFT ■' 
IF r(P) < TCT5 THEN PfiUr '^TO THE filGHT^' 

pRm 

RETURN 

PflTttT ■■.J__TH[B mt m ROLL "lO^ 1 ;-BftLL3 SifCCf Gfi [ y t L ¥ AT i TflRG 

-BALL [CALLEB A JACKk TttE OBJECT IS ro 6ET 
■TB THE JACt AS POBSIBU, IWE JftLLS ARE 10 

"fiJTE WEI6HTEB SB THAT TlfET ROLL l^. A CURVE 

Ir^Tur"^"/^ ^^ '"^^^ ^" ^^^ ^^"^ "0** ^0LJ AT COOJIPINATES 0-0 
"TO THE JACK AT COORBIJIfiTES XpT, A POSITJiJE 
"THE BALL CURVE DLOCtUJ&E. A NFBlTIVE AilQLE 



pcrNT 

PRIHI 
PRIJtT 
fftlilT 
PRINT 
PRIHI 
PRIRT 
VRIUT 
PRINT 
PRINT 



TNf BALLS A^ CLOSE" 

Cn IM DIAMETER AtfD" 
■VOU URL hfftyc TD" 



IB' 



PRINT:P#[*IT 
fRlKTjfsmr 
EtfB 



"AJfTI-cmCfHIJSE, 
"STRAIBHT IF TlHI 
CHJTiJC ]N fITHEfi 
"HINT, m 
£ET4IRM 



THE MCK IS A 
«IT IT. BALLS 
BISECTION." 

M INITIAL VFLDCHTl 



4 Cfl illBE ANB HILL 
HIT ET TOUR THROUtT 



ANGLE MILL HAKE" 
mU nrtXE IT CURVE" 
ROLL- 
BALL r*flT- 



□F 500 ANil m ANflLE OF tO'^ 



15 



Boga 





ABogaisabogusaniinalormytriicaf 
bea$t In the Hurkis family. Like a 
HurklG, the Boga hides on a grid with 
dimensions up to 20 by 20. \X sends out 
cljea Ihai lell you which direction to 
mo^e from where you are to where it is. 
However, one major difference 
between a Soga and a Hurkle is the 
Boga is also seeking you out at the 
aame time you are looking for it. You 
don't have to tell it which directions to 
go after each of its guesses to get 
closer to you. It apparently has e very 
good nose and can tell on its own^ 
However, It plays fairly and gives you 
the first guess, and then it lakes its 
guess r Guesses continue alternately 
until one or the oiher, human or began 
find Ihe opposing player. At the begin- 
ning of the game, you may print oui the 
grid if you wish to make your guessing 
jot) slightly easier. Remeniber, direc- 
tions in this game correspond to the 
diagram: that is, north is up and east Is 
to Ihe right. 

This game was created by David 
Strickler, 



N 



W 



RIW 



natlrlSTJllKp riEU J£R£EV 



TOO L'MT iNSTRUCriOHS^ TES 



IHE ftflSit li HIDIIIG OK li CFS^fi HOtr SPfCIFY TilE LENGTI 
mil I^EITKk TRY TD BUE^S HLJ POSITION LfSIHG THE H]4fl9 

I CIV£ TDD. EACiC SUESS IS TirD HUtilEfiS SEPERArEH £T 
^ fOM^il. PLEASE KEE^ ]H ALlf& THAT THE AQGA IS AJ-SQ 



htDir SIC EHifULD THE BtID tEC2C tlflXiklUti^-^ 2} 

HDU ItE SKDUlLi THE gfilD K^20 HAXEHtJN}^ 1^ 
bfirilLt 'DU LIKE A SAnfU GRIti' TEuS 

111111 
CI234SJ7Gfd1?J4S 

T ttt4tfttt**ttt*t 
? 4 t ^4 

7 ^4t#ttt^4*44tt + + 

to f|i±vi±ri±d»|4Vt 

1? *t44*t4T4v4444T* 

n * * i 4 » * * * * 4 > * ^ »r « * 

tS vr44Tt*v*4*v^ + tt 

CHQOSE tfluR PDSITTDKT -1J4 

CHB05E TOUR PCSlTIOrC? ^,7 
THE eC]£A PECKS HIS PI^SITlQHi 
CUE8S N 1 » 7|? 
TQU EI^S^S 7 T 7 

fC^S HOBE TO THE 9DUTHUEST 

1tl£ £j)IjA Q[JtSJES ? I 7 

GUESS I ^ ^ 1?p4 
TBI flUESSED 12 p 4 

IC^S HORE TO THE SDUTHUEST 

TilE frDGA EUESEEf 1 , 7 

BlPtS^ ( 3 ^ Hpl 
TULJ iUt%UU 14 f 1 

IE'3 MME TQ THE UE^T 

THE fcOfiil BUtSStS 4 , 7 

THE Edl^A IJUESSED TOUR PiSSITlOlT IH J Glf£SSCE5] 
THE lEWH VA9 AT H ^ D 



HCIf BIS sum I THE ((?!& BEtJO NflXlHUM^ 4 
MOULD T&U iIKE A Sftfl?Lt ittlDf YES 

fi 1 7 9 4 
4 t f « « * 

t * 4 r ^ 4 

i • t 4 It 4 

J ***** 
I * * t * 4 

CRa^5f rirup PUSTtigH-? 2^i 
T+tE VDOA PItHa HIS fflSITlQJf' 
GIJ£S9 I I T ?p2 
TDU flUESSEP Z ^ 2 

le^s lore ni TK south 

7HE IDGA aUESSEE f p 2 

QI1£SB I ; T 4p2 
TDU eifE95ED 4 ^ 2 

HE'S RQft£ T4 TIC HOftTB 

TW loen euEssfs 2 , r 

THE roSA EUESSEB YDUft PflSITlQFf IH 2 eu£354t9>| 
THE BOOfI UAS AT 3 » ? 

DB TOU HWfT TO FLAl- AfiAIMt teS 

Hi^U lie SHOITLH TIfE Sf?ID fiEC?0 nAXIHUM^T 4 
UDlTLir TJftJ LIKE A SAflPLf BlflQ-? NO 

CHflBBE VDUfi fDSITIOWT 0^^ 
TIfE BQSA PICKS ms PflSITIOBI 
BlfE55 H 1 1 2,2 
TQIJ itUESSED ? , 2 

HE'S mn TS TK EMT 

THE fOGft GUESSES 3 ^ 2 

&BE&a » 2 ^ Jp3 

S-Bl GiJESSErt THE BKA^5 fOSIIiatt Iff 2 aUESS^CSH 

TffE BDSA UA$ AT" Z p J 

B{] rOU UAifT TQ fLAT AflAINT MQ 



THjiT THE MSA 19 ALSQ" 



LEST 

PRINT rflBf20);-i:RtflTIVE CflHPtfTJNG- 

PRIttT TflEnSJJ-flORJIESTDUN, N£U JEflStf^ 

PflIifT:^ffINI:PftE*ir 

IWPK "DC TJU IfAflT INST«UCTIflHS":ai 

PSINTcPpWT 

If LEFTJCOIplJO'f- THFN ??* 

PniWT ' TJIE BOBA IS HIDIIfia DN A QRIB CTOU 5P£CIFV THE LEtfGTrt' 

Pftrwr 'AtTB nmi. Tftr re slehs hi5 position usins the ni«ts- 

PHJNT "[ OIV£ rOU. EACH 6UES3 IS Tl|0 NUHflEKS ^EPHRflrEB -- 
ffTEdT °A COmfl. PLErtSE XEEP IN film 
pfliNT ^'SEflpcHirtij FOP ystmif* 

PRINTiPilJIT 
U^5 

WPUT "fICif &[S ^JiDLJlD T-Hf QRID BEC?0 flfl S I*im> ^ ;fi 

rp 05ZO Off ati m« feiNT^GCTo ?rto 

BEPI; PRiffTS THE liRlD 

IlfP4>T "USULB f^]U LIKE rt SflHPLE CRJV 

If lEFTHIf,(>t-t" TNiff JBO 

PEINT 

IF &<]J THEN iiJ 

FITR 1=10 Tl B 



Tl 

i; 
3J 
30 
JS 
4« 
7t 

aft 

91) 
IOC 

toa 
111? 

2?D 

r?40 

2BD 
2fD 
.100 
105 
310 
31 B 
J?D 
322 



12% 



,12 fl 
324 

330 

:in 

IJB 
3i2 

3S0 

3^Z 
3S4 

4n 

420 

^515 

4?1 



J<t = lNT(I/IOJ 
fl4=fll-*CHfilCK1MBh4'* " 
NEO X 
PfiINT IftJ125J;At 

fos j:=o TC & 

Kl = ;f-IKTC>;/11})*tQ 

A*=ftJ4CHRt(X-1lHiJH" " 

ifEtT X 

FRIffT TA&C:^^;AV 

FSR H"fl TG S 

HlktAif"4 " 

HEH X 

FOfl X=iJ JO Q 

PRINT x;tab433;ai 

flEKT K 

PRINT 

W=l 

TtfPUT "CttJlOffE rOUR PflSJTIOH-^ltUl'l 

If ):t>fl Dfr KK5 [fR ■rS^nr] on tKO THEH PBrnTiOOTJ? 400 

Pf[Hr "THE £06A PICITS Hl^ POSITlQNr 

X2 = ltfTcpHIIfn*GJ 



T3>B DB T3(q TlfErf PBTECTrEfTTI? 4fi0 



bfO 
51D 
520 
5J0 
S10 

540 

!S?0 

d^D 

AW 

£40 
i70 
i^O 
7B9 
71ft 
72D 
73l> 
?<1| 
750 
740 
7?0 
?8'J 
7?0 

euD 

Bin 
fl?l> 

fl40 
a7Ci 
SSO 
FJ*0 
?i]D 
91l> 
92Q 
911) 
94D 
?^0 
V4fl 
9?0 



9»0 
t*00 

1^30 
104O 

iDlg 

1D40 
I0?0 
TOgo 

1100 
tl30 

1IZ0 
1E30 

115Q 
IliQ 
Dk 



"^^lENTCRNHMI^Oh 
PRI«T -BlJESB H-XJ 
INPUT K3tT3 
IF Jt3>S OR T3<a QF 
K = K41 

F'F*1 

IF K-10 THEN Tfl^O 

[f flB5CJ:3-:(2)+-flBSfn-l2)=i3 THGfl 1010 

PRIWr -TOO GEfESSEII"3:3-,V3 

fR]*lT 

FRIHT -HE^^ PlilRE TO THE •; 

IF ):J*:ci THEN i2ft 

3F 3:z>j(3 THEN iOO 

PHINT "WORTH"; 

GOTO &24 

PRINT "SflliTH"; 

IF r2 = TJ ThEH 70CJ 

IF 7?>r3 THEN dJO 

MlilT °U£JS- 

ei^TQ 7110 

PSINT "£*?T" 

REJIi LIHES ?l>0-?71| Att[^ lllO-HlO-BOCflS CL}£gSTNC FOR«U(.. 

PMBT^'-tlf H=0 IHEN 7Jlf 

"M*fT(.5*SJ 

rOIilT[,!5*5^ 

PfllffT "iJiE BQ^n G0Ea9E3-X4-p"T< 

U=U+! 

fftl«P i^- 

fl-HB5^fT-r4I*flP9CX1-K4) 

IF a^O THEN 

H*l? 

SF T4"VT THEH 

A=l 

IF ftB3(Tfl-T1K2 THEK 830 

liOfllB n40 

IF mri JHEff B40 

H=[NT[ftRSCr4-flhJ 

«QT[r sso 

T< = INICA&fifffl+fl>J 
IF T4>G TJfl;ri nifl 

IF j:^»i;i then 970 

A^l 

IF ftBsc:f4-xn<; t«EH 9M 
cOsuB 1140 

IF KJ^If] TFfEff 9'iif 
r4=INT{rtR5c|H-ft|? 

Gora S7B 

j:4=INTfflB5a^+fl)) 
IF X4>fl THEN 113D 
ODFQ 440 



■^IHE 



ID50 

"ran 

"THE 



PJIIHT 
P*[i|T 

SDTO 1D;i} 

PHl*fT "TCU 

PJH*fT 

OflTD 

PSIENT 

PRENT 

PRINT 

INPUT 

IF 

£0TD 1 P4I> 

T4=,5*G 

GOTO SRD 

RETURN 
EM£ 



eUC55£D THE BBGfl & POgiTlDH Ili-F-flUtSSCFBX 



USE Eh 
£BGA 



Uf ALL 
UAS ft?" 



OF 
K2' 



/■r2 



GiiE:^sn,' 



DO rou 



LEFTIIQtpJP 



HANT TD PLflt AGAin";»f 
'-T" TftEtt 220 



Bombrun 



Bombrun is an exJremely accurate 
simulation ot an aircraft dropping a 
bomb on a very smaJI larget. Von may 
speci f y wh ef h er Ihe ai rcrafi ) s cl im bi ng , 
diving, antf the angfe in degrees. You 
may specify speed in feet per second; 
you may also specify at what point yoj 
wish lo drop the bomb. The program 
gives you four passes over the target. 

A pertecl hit is posslbfe but extreme- 
ly di^ficull 10 achieve. A hit within 3(K) 
teet of the target is consfdered 
"threatening'' while hits ojtsfde of thai 
range may be considered a negative 
commentary on your knowledge of 
ph/srcs. 

This program was originally written 
by Jim Prelesnik. 



Ctt4TrUE CDHPUTIHS 
nMirialllUIlT VEU JU9EI 



IIIST»[ICTTQN9t TES 

I'DU HIVE JHt DfTIQN Ijr MIIXS FDUt PilSSES OVfR THE TAtDET, 
UTTH THE AllLlTI 1Q ItlOP 4 BDHI OICC tV^lHB ItitH OF 
iHESf PitSSEG, 4LmUSC tMVBti Hk1K fl>l£ IMTDUeH THE 

'CLinvr^rvE' coihahi bt rmirTiiri] 'clihb- oi 'fJvf.fDL- 

LDllEO ST II EOHHA ADD IHC lESitCB 4II&LE fill IFDffFEB^ HEU 

VFlflCTTIES (frAHDtirB FITEin J»a TO fDO FEFT PEfT SECDHP) MT 
BE IWMI i»flf» THE ■*|B5PEED' flUEBIlIlK flUJtH. 'CUHB/DIVE' 
AMIES, Vlifllllie FGDH 9 JB M BEflKEES, LIU AID iS SPEC- 
IFIED tV 'CLlllJ' (ffl'IIVE' CDAHHBS TO TIELD A IfT IVCLlll' 
AriCllf/bEtL.lFlltT10ll 4PIG4.E BFTU^FH C TO iC DEDHEES, CLIIBTIC 

or p]i'[ii&. f Niimofi iiLTnuK of ^ov feet hust iilsc be 

HIilNIArHED. UlUFULLt ClCEEMHe fHi DF TH£ flitj:./n>. SPECS 
UILL RESULT IN TIE CBASK DF TBLR JDRIfl. AISD , fl lOHl 

ciHiAHD or 'Diap' DUFiNe t Hii/i iiJu bive tdur sant an jh- 

IIIAL &DIIHUARD VELOCITT, ShlirTEKIIIfi THE OrOP TIKE, AS A 

^CLIKJ' COniAllir OILl LEDfllHEl THIS TLfl£. THE l»B UILL BE 

HUHCrttB 11H£IiI*TELl FOU1TUIFI6 THE HOST RECEHT 'Sit IE" lESS- 
OUT UPD* 'B»OP' CBMHilMn, AnD LiLL BE HELD FOS fllRIHE* 
PDSnrQHlPlE IHFOMAJLOH DfOH THE CSflKlitfB 'STAVB IT'« THE 
TASSET 15 1 FDEir TV BIMETEB. BOOl LbCFL 



•tlVTTTilLx 
"•STMTBV" 



ELAFSED TlflE,.. 

rjiE9Eirr mble cDxnHD-., 

tEEULIAHT fiVSLE^., 

PBESEllI lEitDcnr... 

'ITITIDE.., 

DISTAHC^ FtOA SITE.,, 

EBTINATEI TIRE OF iRltlVflL... 



SECOHDS 
lEOREES 

D KWttS 
I7A.743 F^r PEP lECQWB 
42B.7 FEEr 
<»e f EET 
3.132S2 SECC4BS 



EBHB CDHnAllBf STAND BY 
STdNPltflj IS, 

"41 sum F»E3tHT PESULTftwr ANQLE' TES 
filPSFEEB? OflO 



#»?TiiTS*4d 


ELflPSCi T[nE.,» 


f Sfcirtiii 


PRESENT AKIrLC COMhArlt,^^ 


D Df sheee 


l:££[JJ.lMT AHBLf... 


DfOBEES 


P'CSftfT VEGOCITT..^ 


eoo FEET PER 


ALl ETUDE... 


^?e*7 fEET 


K&tri^tfCE FRQtl SITC«.» 


J?CiO FEET 


eSTlMlEIi riHE W *RfrlVAL„. 


^.iZi stcorfiFE 



SECOPID 



BBHl COnhAHDt Sjmb 11 
ETAHimB IT. 

"■IHTilN PHESEFTT RESULTANT AftfllE' HO 

'GLJHl/D]»(' GSfUiiaB* BlUE.lO 

AIBSPEED' toa 

■itSTATS'M 

ELtPSEB THE... 2 SGCDHDS 
rttESENT MBLE COHAikhl.., DJUE, Ifi BECVEES 
filBUlIANI MBLE,.. 10 AEBREES AlVlflS 
FIESEITT VERDCITT... 400 FEET PEFT SEi:DHIr 
ALT[T0l(... 3^4.511 fEET 
BISIAHCE FSOfl SITE,., JlOff.IJ fEET 
ESlIhATEB llflE OF HtRIVAL... a.2«lS SECDHIS 

■ V 

BBKB CIMHANII* STiMfD BT 
SIAVBIHB n. 

MIHTlllf PtESEHT KSULTANT AHBLf TES 

AlR5PfE»T 700 

t"tflT*T3t" 



tLAP»[B TIJIE,. 

PKEtElIT ADSLE GOHNAim . . 

DESJlTAItT fkHBlE.. 

mSEIT VEKOtlTI.. 

BLTITUDE., 

IISTAHGE FKDn SITE,. 

ESlmilTEV TIRE IF liRirm.. 



. 3 SECOHBS 

. BEO^EES 

. BESffEtS DIVIMfl 

. ?0i} FEET PER lECQHB 

, 7e!.956 FEET 

, 24T9.7a FEET 

. J. 1101 1 SECDRDE 



■DRI CBHAARBt STAND BT 
STAHDIRB BT. 

HIIHTAIH RIESEhT KSULTAHI A«LEt YEB 

AltSPEEB* I'M 

IF Tout ALTLTUTE ISrT IRCREABED INREBTATEIT TO fl fllir- 
IRDN BF 100 FEET, A GIRSlI JE IRrtlirEHT, 

'tLJRI/DlliE' COARMD* CURB ,29 

IBBR IDRtEF CANRI^T TDIERATF TIfE STfiEES CALfSElf BT flHBLE 
IBPOTS EtCEfDINS 15 DEbRtEE. tECBlBIDER IflUR CHDiCE. 

'aiKBj'BIVE' EORUNBT CLINB,lJ 

ATtSPEEIt SCO 

TOOr BOHBER FRILED TO RAIflTAlH T« LOU ALTJTUTE YD J BE- 
SlUt Ul IBOH CRASHEB. 
lETTEt LUCR KIT TIRE. 

■INIHQ TOBH I -PASS BOfltlKlH, YDU HANAfiED TO STBIKE 
HITHIR FEET OF THE TAt&ET. 

UILILB TBir LIKE TO lELDAD AMD PlflT AOitUf 
T IE3 



—llflTHL'* 
■■'STRTS"t 

ELAPSED TINE.., StCDtltS 

PRESENT 4HGLE CONHUND... DESREES 

RESLlTairT AHeiE... D BEGItEES 
PRESENT VEROCiri... 547-fS8 FEET PE" SEGBHB 
fltTTTUPE,.. leZ.JJS FEET 
DlET4irrE FEOH SITE... 4Ht FEEI 
EE1ZHATEB TiHE QF RWZliflL.., 7.TJ31J SECWBS 



BmiE tOANAIlDT MAifD 11 
STANDIRB BT. 

r 

BKINIAlll PfitSENT HEBULTflflT ARCLE? «S 
AIRSPEED' TOO 

16 




t^Ali/TfilH PPeSENT RESIXTllHI fl*IGL£T (fcS 



■<p>BTATQ*>< 



El.*PSEB Tint.., 
PREfiEl" flUGLF CCrtMMfl... 

fiESZHl 'JEfiQCITl... 

•iTirUHE.,, 

BISTflHCE FRQJl SITE.., 

ES[fJlftT£ll TJflE OF ilPft llfflL . . . 



2 SECOnirj 
HGtlEE5 
a DEEI?EE3 

?5iJ fee: PEtl BECOhD 

I2B.55? FEET 

4 sEi;ovi]a 






?l 



rtllillTflIN PfftgtWT RESULTfllfT ftPlliLE' (ES 

AIISPEEIIT 724 

•i»STflTStt.* 



ELAPSED TEHE.., 

PSESEifl ilNBLE CaWftNB.,, 

KESULrflPT fthJItE... 

PRESENT uEsaciir... 

AlIIEUBE^.. 

BlarflNCE FFroN site.,. 

FSTIHflTEB Ijn£ Of flflUIVflL.,, 



3 JECOnJIS 
HEGPEFa 
DEBIfEES 

?30 FEEI PEP SECDEi* 

12B. 557 FEET 

2J30 FEET 

j saavos 



^AN[rihe Br, 

MlUIalW PRESEEfl FfESULTftrtr flWQtEl TCS 
flIRSPEEJh' 730- 

ei-HP$ED ttHE.^. 4 SfCOHDJ 

PffEWdl ANGLE CONHftBfl,.. II CEERfE* 

RESUlTftWr HN6LE,.. U OEtffEE?- 

PBEflEHT VEIfOCITf,., 

PLTITUOE,,. 

II9T4bCE FIfOK ^ITE... 

E6TI«*TED IlflE Of *9««t.__ 



735 FEET PEft SECOND 

]?B.552 f Eer 

nni FEET 

2 SECUriDS 



BCHD f[l|trtnNlt? aiflHTl BS PLEASE 
UilfEi:i]GJI]!a£LE COHPfANll. JtEFLt 



■snuUBIfi' OtUHOP-, 



nfllNTfllH FlfESFilT BESllLTiKI ANEtET lES 



ELAPSED TiHE,.. 

PiftSEJ'T Miit COhniBD^.. 

WBULTfi.HT flN^LE... 

HfESENT <JERBCirt... 

ALlLTUBE.-. 

Br^TANCE FRDK 5!TE.,. 

ESTlBftEEil JlB£-flf SfiRLl/flU-, 



S SECDHDa. 
lEQFiEES 
Q SEanEES 

300 FEET PEB SECflUB 

»Z».SS2 FEET 

1200 FECT 

4£CCa>lB» 



BBHS DRDPl^FJi, 

lUL to. Bjgr.iraaB.,. 2^Ais>- sBCOiin 

TBE EOltB LflBDED^ J5?.?B FEET [ft FHOttT OF THE IflPBET-S CEWTER. 

lllrfflBB roup 4 -F«? BBJIBRtlH, lOU 1dNAQF» TO STRIKE 
ll^Ehbfe fr FEn> OF- THE TABIIET. 

Unill n Ti:u LIFTF TO REL04B 4rfl) PI.AT fltfUMF 
T ta 

LDDir BiJElf THE PII^KS LAUB SBUEnhJiie FALLLWI. HTJILEa, 
AiQ HETUJTFf TO PLAT AB'LlI SDOIf. 

n 



LIST 

10 PRINT TftBtJ^J-KKIBHUS" 

13 PSINI IflBISOf-CBEATIIfE COHFUIUfB" 

TS PfflUT TAB(lB)-l1IHHriST0UB. MEU JEBSET- 
]» PRIJfTiPBlNT 

70 PRI«I"TNIS PROEFJAM 51J1ULATEB 4 KmiHG RIJW. JIB rOlf «E&- 
?5 is-jooa 

2P PeiNT-]|l?rR(ICTI5(|5"J 

40 INPUT F$ 

35 IF l*=-l£9" THE* 9l> 

fltt JF II" "NO- THEN !$(i 

?a PR L NT- 1 LLfleiCfll PESPQUSE, BEPtY'TES' Oft '►NO-." 
e« BO TO 4C 

PRIBI-TOI] HAVE THf OPTIBN Of PIAKING FOUR PASSES DVER THE lAfffif ■ " 
PPINTLlTh THE ABILITT TO DftOP A BDIIB OCCE DURIIIQ EACH Of- 
PPIIIJ-IHE5£ PASSES, ALTirUBE CNflJfQE? flflfBE >UBE TUNGUflM IHE' 

■'CLIHB'EIUf CDHHAfB II PPInTKO ■tLIIB' Off 'BlUE' FOL-- 
LOUEH Bl A COflHA AUB TJlE DESIREH AUllLE UN (tBPEES)' lH\J" 
[BANfllNJi FRDI* 3&0 TD 9||0 FEET pEft SECDnPJ KOf 
IlfE 'AIR5PEEC' 0BE5EION hflflK. ■■Cl.lflB/IIyE'- 
fRQJl 10 15 ffEGIfEES, 1|[LL ABB Aa BPEC-" 

CONraims TO IIELB A HET WCI.IN-- 
rO flC BEBHEE^ CLinBlNQ- 

HUST ALSO BE- 
mi./*IIN. SPECS' 



li 

190 
ITB 
170 
1 3D 

TO 
15i> 
IftO 
l?fl 

Tg^i 

3:ii 

2111 

2&0 
270 



FRim 

PHHf 

PflNT-VELIIClTUS 

PflNT-BE IJfpJI 6FTEJI 

PR] HI -AMBLES, UARTING 

PflKfT-IFlEB BV -CtlW OR-JJVE 

Ppr?jr "ATEDK/DECLrjJfiTlflB flIfQLE ftETHEEN 

PflINT "M DlUIflG. A flLNINUN ALTlIUBE OF 160 FEET 

PRINr-PAtdTAIWCB. UILLFOLl' EKEEDIHi flNf Of TWE 



MINT- WILL P^-JLILT IN ThE CRASH 
PRINT-i:4ltT|i!«[l DF "IRBP' BBRINB 
PRUfT-EIIAL DBUCUAItB «LOCtTI, 



GF TDUF ffG^BER. ALSO 
A BIJE UILL GIUE IfUJB 



BOHB 



, SPBRTENINB THE lH^OP 
PRIHT-CLI-IS' COWANB UlLl LENGTHEN THIS TIlfF. THE 
PflEHT-UdffCJfEB IJtNEDUTELT FOLLOHIKO THE flOST PECEH 
PfilNt -BUT UPOlf 'IBOP' CBNdAN&p ANLT OILL BE HELB FOR 



lOtIB" 
Alf 14-' 



39D 
3flfl 
iH) 
JJO 
330 
3Kt 

37V 
JIO 

iH 

400 
410 

4ia 

4S£l 
Aid 
*?0 
AM 

i9a 



5Z0 

S'O 
550 
5&0 
57B 
3^0 
^fO 

met 

A70 

65a 

A70 

iaa 

ATO 
700 

710 

i'lO 
?40 
?30 
760 
?T1 
7R0 



iNFOlinflriON UPON THE 
FOOT IF* DIAPETU, 



COHriArfB 
B LUCK- 



■5TflBB Bl- 



PNINT-POSITIBNINB 
PR]|fT"TflRQEI IS 1 
ZlilOOD 
ZZ'IOQO 
ZJ-iOoc 

Z1=]O0O 

R"*tl 

ilia 
U3=0 
U4=0 

4-0 

i'=vrnooti 

IF U;30C QG W>?0O TUEJf tlO 

11=PNDCII 

ViT1"&00' 

IF KlOO rHCN440 

1=4500 

PPINT" ■ 

pRWi:" - 
am a- WW 

310 PRIJIT Tfl8t301"'-TIHTlAL"i" 
FlflttT T4ai30]-**.arAIS'"" 
BOTQUJff 
Ul=* 
U2<» 

IH-f 

fP3MI- *' 

fIH«T*'flQHI £QHHfl«B"t 

mpur c* 

IF CJ^-STflflB Bf- THEN i4ff 
IF C»'"OB;OP" rHEH lABO 
PRIIIT-EIIIRECaDNIZiULE CONHAND. 

PFdNT-graiiBiJiG bt.- 

PRINT ■ - 
flQTa-700 

A=fl-ft1 
T«T-1 
aOTO 770 

PNinT-rTAlitTftlN PPESEKT RESdLTAUI fidOLE-l 

LN^-UT Pf 

PR1*T" - 

IF Pt--r£S" THEK 11»F 

IF PfE-Na- TH& 770 

FJH*T-BEPLT TES' DWrtO'.*; 

QDT& 710 

PBIPTT-'CLWB^IHUE' CllWlMir; 
INPUT 4t,A1 
PRtlH" ■ 

IF flKl> THEft B3fB 
aiO [F Al>ia TISH 071^ 

h:o 00 eo »3o 

93c pblht-mole input i1u8t be positve. if hehssatt, chame the' 

9» PBUtP'MwE' CONHANB lO CLIBB', OF Vice UERSfl." 



TINE, AS fi- 
4FIB tflLL HE" 
'STATS' irEAB' 
rURTHEP" 



THE' 



REPLT 'SnUBB*- »'ISQK,- 



■10 



aiO PUNT- " 
atl GOTO 770 

ISc mSl-^Qir&O^i^ ^.IfllT TJimrE THE Sf^S CftlTSEO flT ANGLE" 
v" mll-INPUJa EXCEE*1*6 .5 CEGKtES. mO»BLBE« YD^P CHOICE." 

?li> PffllfT" " 

970 BO TO 77D 

930 If fl»-"CUIlB- THEN ?H 

9<l> fll = -*l 

flfiO IF H-ia THtl ?90 
970 If fl>*0 THl£W ISiO 
?Bl> &D1D Ilia 

15?S PRm-ioS^f^T'DiyE- uonmm uill exceed t« nflmUH re-- 

1D70 KINT-SUlTPrtT tWl ANCLE QF 40 &EGREE9. tfiUSHIIi AN !IWEVEf5lll,C- 
|«0 PRTilT- NflSEimiE. BEC BH 51 IfEP >OIJB CnOTtE,' 
HBO PfflllT" " 
IDIO 1*0 TO 47l> 
ID^fl U3=U^t1 

ISgO mlI™^PflEGE5T 'CLIMB' C0hl1*^B UIU t:LLEEl THE mOHUN SE-" 
11190 PPINT"5ULTfllH CLUB PNttLE Qf flO HtUREtS, eflUSTfJG IDOB 

1105 fFl mi ■CHOICE" 
1110 TIHHT" " 
|i:0 QQTQ 475 

ii.iQ fltn 

I HO PHiiiT-inirBfEFlc; 

1150 IlffUI V 

1160 If W>90i> THEN 1f?0 
1170 If KiDO :HEN I2J0 

1190 PffIlfr"inUP HDttHER ISIf'T CftPftBlE OF *TT*ifflTtl6 IHftT VFLnCHT." 
1?&0 PfflNT'INPUl an aiRSf&tP LESS THflH 900 FEtf PEB BECDND." 
1?HJ PfilJir- ■ 
12?I> GDIO irSD 
f?30 VA'\l**i 

!?50 PUdT'lF rOUff tfELDCITT iS^T IrtCP£fl5EE IHHEOJflTELl, iDOfi HDHBER" 

UfiO PffTHI'-UlLL FALL TQ EARTH AND BE HES T ffO r£ B . " 

>270 PRINT" " 

9 2B0 IJQrO 1110 

1??0 T-t*T 

1100 B^fl-3-lfll^9/iaC 

laiO f = T'li-BIN<ff 

IJ2* If T>ICI0 THEN I3?0 

liJO Ufl'lfS*! 

1j?5 PSm-lf'^TflUB flLTlIUTE ISH'T IWCREABED inilEDIflTELT TO A HTh-" 

1340 PPINT"lflU)l OF 100 F£EIt H tniSH l^ »IB]lfE«T," 

1370 PRINT' ■ 

I3Q0 GOTO £70 

li9Q i;=)-'^-i:o5iBi 

lino IF i-f-O THE- 23H 

1*10 E=X/('/"C05(ft)) 

Uia PRlilT TflB(30l""-'STftT^»->" 

1*30 fHUfl" " 

1*40 IP NaT(T=l JTKEH H71 

1*50 PKINT TftB17IJJ-£LflPGEli TIlfE... ( BtCBifB" 

14JD GDIO 1*^11 

H70 PFHI-T TAl(ZOI-E1.ftF5ELI FlflE. , . " ;T;"GEC0NU5" 

HBO IF NDT^AI^OJ THEiJ 1510 

H90 PfiliJT TftBLIIJ-PRt5E«l flMLE CflflHfttfB. -. U BEOftE&a- 

1500 BOID 15^11 

I510 IF Hl^-tLlSB" THEN IS40 

1520 PRlNTTflBUl] "PRESENT ANGLE CQflHPWD... IlLV£,-;-flH"BEGtEFi5- 

ISM Pfi]2r'"Bl1l)"PPEStHl ANGLE CQ^NPHB,., tLlf1B,";flli"B£6B£&*- 

I55tt IF il<0 TNEJf 15?0 
1540 LF i*:0 THtN IfiU 
117* PBLIIT TflBll7l-FlE5BLrfl*lT ftNOLE... U DEGflEE^'' 

1590 PRIItT :flB07l"Pt5ULTflNT flhOLE., . " ;-fll ^-DEGPEEB TJlOiriB" 

1400 DPTO I4?0 

IfllO PUNT TftB1l'J'HElJLTfi«T i*N&L£ . . , " m^'DEGREtS ELlHElNG" 

liJII PBliJT TfiBll6)"PPE5tNT VEROClTI... "J^l-FEET PER 5ECQ(ID- 

UIO PHllfr TflB(24>"SLTIT(IDE,,. -;[;"f£ET" 

UaO PRINT TifBUBrDLSTftHCE FRDP BITE,,, -;J;"*EeT 

laaO PPINT TftB{7h-&91]HfiTEII T£M£ OF ARKlUftL... " ; E I " aECfmBS" 

1460 P*!1HT 

1670 BOTH 540 

liflO PRTNT"BI!nB DflDPPEO." 

1690 T3^(5n^lU.GiNlBir2>4B,4'l)'i^^aiNfB)J'J2.2 

1700 PBIHT-TKIE TO ESlPLOBlON, . , ";T3 ; -SEtDNBG" 
1710 I'l-U'COEIBJ'TI 

1720 !(±iniH-!OOJ/lQa 

!7?5 IF ■5>flB5lH5J TH&rt K5=flesa3t 

IT3II PHIKT " " 

1710 IF «-.5 TH^ I7ai| 

175(1 If i>-^ THEN IBM 



1740 PHHT'CDiJERflrULflTSONGt YOIT SCDBEB fi? PEHfEd HIT. 

ull pSm-?;" Bo« L.-B.»";-.;"rEET b^o.b the t.rbef'b centep.- 

!bJS p'ISt-?;^ BQHB L.NBEB-JJi-''EET U FRDHi DF ^1^ I^liQET-B CEf-IEll." 

1810 IF if-1 ther laso 

lfl?0 [F P=2 THEN iB'i 

■830 LF t'3 THEN 1390 

1840 ]F AM TlfEl 1910 

Te^O 7|->ftB5(!() 

ISbO GGIG 7100 

1S70 ZJ-flBBUt 

leSD ODTO 74?0 

IBSO Z3=flB^((> 

IVOO OOTO 34(0 

1911} Zt-'ilBSU) 

TT20 Zl=Zl0n)iZ2'i10(?lii3'ZI0IIkZ4=71'>fll 

19Z1 FOR H=l TO 4 

192? fOR ni= fl TO I GTEP'1 

19Zi IF ZlflinXZllltlll THEN J1iHHI=<5 

1P24 '-f N^Bl "B N=l THEN 1926 

lfl?5 NKTHl 

19?d "EIT II 

|?30 PRINl" " 

I9a0 IF (3i= laO TMtW ZOOO 

1T50 PPINT'rU5l«0 YOUP-iPj-PflSS ffOHB'^UN, \QJ FAlLfB IG EJEtf 

1?S0 PRmT-THHIiTEl' THE IllRaEl UITH f> f-U. BETItR lUCK HWl TIJtE. 

1970 IF Pl=-H0' ThEa 259D 

17B0 EQTD Z040 

aooo PRir^T-BUsisE roiirt"R;-P«53 eauBEON^ rou r+aHAUEB td sTsr^E" 

2010 frt:ifT-UIIHLN";J5;"F£ET QF THE ISkGET." 

5020 PBllUl" " 

20M IF IL1°"ND" THEN J590 

2040 PFLIJIT'IIOOLD VOU LISIE TO RELOaB flwB PLAT *OftIH? 

^050 INPUT a$ 

TOflO IF "■■NO" THE*) 259B 

2P70 IF fll="'ES- THEN 710D 

?0B0 P*!mT-VQII nU5T BE A LBUSl SE^LLER . REPLl 'TfS' GP'rtO -• 

20911 GDIB 2D30 
■JiOO 11=0 

717(1 PRIilT-rOll TO»C THE U1MG5 OFF OF TOUT; BUNJER B( EKCEEBIHfl THf 
2130 PRIhT-HHlhUII AHBLE LUfUT DF l! OEGIIEE?, MEIT TIME TflKE AT flDVlBE 

3110 H^l 

2140 OQTD 1520 

2170 PBINT'THt BTEEP BIVE flNBLE DEBIRtB CAIISEII AN IRREVEHigiBLE «05E 

2IE0 PlfU|T''BTIJE, ftSULTIdE IN IKE BESTROETIDN OF rQUP BOHBEP." 

219D K=l 

■*?I0 PRINT-THE ElfGINES OF VQIIR BOtBFP FflREB UHILE a.TMBWG TWE" 
22?!l PFLlltT-&r££P fHGlE ItfPUT BUBING lOUB «6LE CLUWAflD OPfQPiruNin.- 
2230 H^l 

^jja PflHT'THE VfROCnr of (DUP BBHBER UfiS !*l5UFfLCl£NT TO SUFPGftT" 
2JfiO PRJ(»r-[T5 UEIBHTh ilND CO-SEBUE'^Tl.T IT tflflGHEO." 
2J70 H=l 

'J90 PRINT-IOUR frDHHEH FftlLED TO (laTWTflTJf THE LGU flLTITUTE VOfI BE'" 

hm PPIHT'SIRED 'JIB EDON Cfift^HEO,- 

2310 PH]cr-BETT£R LUCK NE.T TINE," 

2120 11=1 

^J30 liOTO I'^O 

''im PPEdT-VOUe BOKBfil JUBT F(J1iBEEi UP IHE TflPGEt, flfID HEtJJLE^S TO 

2350 PmnT'SSV, 'OU 10 LONOER THflEflTE" ITB EHBIflilCE.- 

2360 PRINT" " 

21^0 IF R=2 THEN 29l<t 

2iB<! IF R=i THIN JflflO 

2m If BM THEN T?U 

2400 0*^" SECOND " 

2»I0 OOTO 3450 

:?<2: 01='TH1RB" 

2*10 GOTO 2450 

2«|J ai'"fUURTH AND FSHftL" 

ITtl 's[NT-lBU HA^E THJB FflR tOBPlETEB I Rll«. UEH/LD YOO LIKE tO" 
?*70 PEIdT-ftflUE fi'lnlHER PASS"; 

2(?D PRIHI"IOU Hfl^^E THl^S FrtR COaPLEIEl ^fl^'BtlMS- UOULD ^OU LJK( TO 

HflO PfilNT-AHQTHtR P*iSS"; 

21TQ lilPt^T P» 

252& IF R* = "-rE&" THEW M*^^ 

IBJO IF R*:''«l)^ THE« l?2fl 

2^AQ PeiNT-SlBPL'f BEPLr "teS"' DR-HD^.* 

2JA0 PSTHrTQjR PLfiHE KftS CIRCLEDh ftHl> 18 KQIf IK FDSTtlOtt TO flSM' 

2570 P[tlHT"tTS'";airP*^5*° 
,;3fl: GOTO 3J^} 



-H 



25?a PPINT"1.DDT: nyER the PHrSICS IAUS OC^^ERJfJrfl! ffiLLINU IQl 
UM PH^T'llNIl RETORJI TO PLAT aBH" BGON-- 
2i10 EHB 

ai 



TES, 



in 



Bridge-H 



BrFdge-if is a ftvo-player pencil and 
paper logic game One player is 
represenied by X's. the other by O's. 
The X's and O's are arranged in an 
alle mating grid paHern so that X's may 
be Joined to one another by a line 
withojl crossing an O and O's may be 
Joined to one another without crossing 
an X. The object of the geme fs for the 
X's to draw a iine from the Jop to the 
bottom of the board. The O's must 
connect a continuous chain from the 
right to the ieft of the board. Players 
move alternate iy and may go any pJace 
on the grid. Any two of your symbois. 



either X'a or O's, may be connected 
together on a given move. 

In this pa rtJCEj I ar version of the game, 
the computer is your opponent The 
computer pi ays me Xs and you play 
the O's. The computer moves first 

which gives iia very sJight advantage If 

you find ir is too formjdabie an oppo- 
nent you may wish to modify the 
program to allow the pfayer to move 
fjrsl. At any point during the game you 
may ask for a printout of the board and 
see how the piay is progrsssing. 

This program was written by Wichaef 
Kass, Miles Barel, and Alan Segal, 



Run 



BHIIHrE-rT 



06 yQi n*iir: mssBifCTiOBST ees 

THf UPJECT Df FHtg GflHF 15 TOR ^00 TS SB FROIt TUE LEff 
COLUPJr JH IME IfJijHl C3LUflW Bl L DlUfEt T | F<C THE 0'^, THE COn- 
PtJlER hUSr OD Fplftl TME FOf TO lH! BOUOf Br CBN«ECriFftj 

ma HAKE lOUFf BDVES Bl ^nUH IN THE COBKBTNiTtS a,T) Ol' 
1 CffJ-B W , H OU ) 

0' TH£ -0' ^fu UIBH TO *OVE FFTDfl fl/IEff THE COhPLTEfi 

TOUR nDliE FRflH? 

AFfD II TTPrHD IN TNE COOOINdlES Of TJIE-fl' tm UiShT ID BOyF 
TO SFTFt TliE CQnFgTEi STPESi 

TO* 

TiJU Ca!\ fliU'E EITHER ITERTUflLK OP HOSIZQNTflLLT 

BIT! "OT MflGlf^fiLLV. .CO CflkNdT lO^E UFRTICflLL. Jlf EITNEP 

IHE ^IRBT rOLllh" DP JHE THItFtENllT ttlVntt. THE tQfiF'UTER UILL 



TEfii; M LinE 



"tl n*ir U5E Thl5 BDflFfC TO Hflj^K TH£ nOUES OtT OFT 

'BLI CflX QtT AN UPLFftTEC BDliEJi i»FTEf rou ruiK^ EACH KOVE. 



lilt 
rZ34?£7?VOI33 

•i j: !■ I ) 1 < 
r^KDoi^ciijL: 
II t / j; i :( j( 
lOOElDtDDD 
' ' X X X i I 

sooDooca 

^ 1 ^ ); t 1 n 
ADorjotroQ 

5 K i I X X H 

aGDi>aooo 
a 1 I ( JL t [ 
:: c ? 5 D c e 

! J < H J X X 

i?a*34?B?nii 

1)123 



I HOVE fRWl :,1 n 2,3 

BCfARfl fTE$ at NHJ7 N 

f nauE Ffian i , 3 to ^ , 5 

lOOR IHJ'JE fflOn? 3,2 

ir 3,4 

PCftBJ (TES OR Wm N 

I HDUt FPQh fl , 1 TO 1 , J 



fOllR Hm FROn- 3, J 
TB? 5,3 

IHVflLrf nOUE " TR. SQUHl 

TDUt nilUE FHQfl* 3. a 

TO? S.i 

BOflBD (T£S tie IIDJT h 

I nirvE Ffren a . t 10 s , ? 



lOUP BDVE Fl-OR'" S,4 



ftEB OR NO J? N 

f IQiJE FftDn 4 , i TO fi , a 

BOflPC (rES or: itcf h 

I nOyE FfiDfl s , 7 T8 ( , 9 



TEilir Qir LINE 



TO' ?,lfl 



21 



1111 

13 w X j: :< s 

11 < i It ^L !( ^ 

1& D D 11 a-u □ 
? ^ ?■ X K :< s 

a fl Q U-i31U U 

7 X K X K X R 

d D g-UiCl l] a Q 

5 3: I'l K K S 

■1 D-QiD^O D 

? G^Q'Cl D C U 
1 J: K ic i1 X ^ 

12345A7aT1111 

Q123 



i nO'JE FftCH IG , ? TO IP . 11 

roufi hflUE FROnt 9r8 

SDARD CTES OR HC?^ ti 

J HDUE FFtarL 10 H ^ TD 11?^^ 

TBUft flOVE fSllri? 7pa 

I riugii tliCiri a r 5 TD S p ? 



TD7 llflZ 



PB1HT 
PfflHT' 

P*:INT 



(TES OR HD)? H 



J nClVE fR[>H 13 p 11 EO 12 p 13 

I UlfllMI 
I 

1111 
12J« 676951 ^3 
M J K K X X X 
12 Q £ il O-Q^a 
11 it X I X X I 
3C^ D 0-C]i[f 

fl X ii X xij: ^ 

8 D D D-DlQID I] 

A a o-moiQ a 

5 X K'l I E S 

4 D-aia!l> Q c u 
3 I^X K H X X 

5 DIDhQ Q Q a B 

1 Jl j: i t K S 
I23^5i7avl111 
Cf23 

MliT 

K FRLNT TftBL:a?;"CPt:iiiiyE cshi^uiiNt" 

2fl PIIIHT T*BnB3;-ilQllSl&](lUNr «EU JERbEf" 

3P l'l-2 

^2 PRIffT 

5S PRIHt 

/li PfiiNT*DQ raii i;piNr tNSTR;jCTiOH5"; 

9Q PRS^T 

TOO If LEFT»iB^*,1? = "il"" THElJ 300 

r? FfL[JiT-TH£ OtJECT flF THIS Gflnil IS Fi*G VflU H] S^ ffiOft THE L&b-T 

UP PR]KT"CflLt]HN Tfl THE RICHT CaiUfllf BT CQJlN E CTl ilO THE U-'S. TK£ CDH-" 

111) PRIHT^PUTfft HU5T OQ FPDtl THE TAP TO ThE BOrTDh 0t I^QNClECriMG" 

US PSINT"THE J:-'^." 

tiC Fft[JiT"VClU rtftKE rcuft ftOVES Br mrrfff IN THE J^UORPINATEE (Xrl> OR" 

17{I fREKT-CHOLUHUpllDUr 

171 rRllfr'QF THE 'fl' TQU li[3« TO MOVE FSUtI AFTER THE CUHPUTER* 

1P2 fRlfiT" TfPE^C" 

1SD PRINT 

1?0 PfilNT-TDUR nOUE FRttM^" 

210 PRI«T 

:;ift PJLlill-flNIJ Br TYPIHG in the Ci1UR[HH^TE3 of THE-'IJ-' ^BU UISK TB ROVE" 

22C Fff[*il'TCl flfT£R THE COflPtJTEt TIPESl* 



230 
24& 
290 

2ti0 

^30 
211 

294 

:si]p 

330 

3^(1 

asi} 

3?0 

3T<1 
«"J 
410 
420 
430 
4141 
4311 
4?D 
-1*0 
SOO 
ii^ 

52 C 

aso 

5?0 

5BD 
5tO 
400 
61{^ 

4^0 

440 
6rC 

£B0 

r'flO 

710 
7Z0 

730 

750 
7tO 
770 

7B0 
7!D 
liao 
QLO 
810 
S3Q 

QED 

&?0 

3B0 

3?0 

900 

91U 

V20 

950 

9fiO 

970 

?SI> 

910 

1ff|?l> 

lOlU 

H?D 

1D30 

1Q40 

1^4D 
107D 
1090 
1D90 
5HJ0 
1110 
112^ 
1[J0 
1M0 
1110 
tldO 
1170 
11 BO 



TO" 



EUT 



CAN KDVE EITHER VEITT f f^fli-L r OR ttOflTIDttTALLt ,^ 
rtUT BlftGJlNflLLTH rOlJ CfiNilDr nu^iE -JEftritriLL-V IH EITHER" 
PR[HT'lHt fEfiBT COLUftN OS THE TfilRTEEHTH tOLUKH. THE ^fHPuTER UILL" 

fRii!T"haL'e ^;r3t." 

FRlNltPRS^I 

Din X[Zi}j20h 

!ilRSi2D,20] 

IlinT[?i},20J 

fOfi >.'i TO U STEP 2 

FQft Y=2 10 1^ 3TEP2 

^<rjK?=i 

NEXT T 

HEJT X 

DOTDqSO 

PRENf 

PRI*iT-5DARD OE3 Bft «Q^'; 

lilPUTBt 

PRIJIf 

IF L£FT*Cfflir]-'^«" THfF «fi 

flOSUB 9?0iREn FEINT BUrtBD &UBRCUT1WE 

^F E05 TiEJI 310 

affTfl JOS'] 

GD5l^£lt4l>4AEJl CDHPUTEE nOUE 

[iD5UB fi^OiREH HDflFUrtR UlN SUBROUTirfE 

PRINT 

If £=5 THEN 42i 

GCS:jf:7lO]6E[l PLATES UJN SLrBROUTlHE 

?RINT"TDUfi riD'JE nfOH"; 
[NfUT F,Q 
PflLfclT'Ta"; 

:bput fi,bi 

*"ft]*?T 

GGB!JB J?2^:REi1 EffliO* JlNB CMAWGE BDflttD EUBR^UTlHt 

GaTU 4?0 

RCn UM SUERDl^TlflE t *«+**■***+*•*«•+***=*«=»=*«***«** *=****'**»*'"=* 

REH FJflST TEST 

FDR H=1 IQ 31 3TEF 2 

IF fltJtpJl'i THZN 7II> 

rtEH H 

BlJTa 950 

FOR 1=1 TQ 11 STEP 2 

J-2 

IF 0(IpJ)"3 THE« 74D 

»EXT I 

Garo 556 

REh OTHER TE:^T13 

j-j+a 

IF J^ta T«ll 9*13 

IF □(IpJ]=^ iHEn 8/0 

1^ Dr! + l,J*n = 2 THEN B90 

If I-l'.O iHEiJ 84^ 

If 0CI-ItJ-1J=2 iHErt 920 

IF :fatiHjtn=2 thejt a?c^ 

IF [-K^ THEff9flO 

IF K'I-l,J'l) CHEN B9i) 

BDTD ?fll} 

J=J-*2 

eoto ?fi& 

J-^J 

1=1 +-2 

DOTO /BO 

J=J 

GO TO ?eo 

FTETURK 

RE*t FHLhT fiOflf^n SUBRfflJTIH£ ^tf :*«**«**■**•»• t«******t=*«M+****«**=J 

ll=E^-^ 

[F RM THEN 11J0 

PRINT'TEfirt DN LJifE" 

Pfi E EiT* -' 

PHIifT-TClU Kfi^ USE THIS BOftftTS TD HIiRK THE 
PRm-raii tflS fit I fiJt UPBliTtO BDARD ftFTER 



nflvES af*r OR"" 

rOU riAliE EACH ^lOUE^*" 



fRINT 
FRIHT 
PGfNT 
PfiINT 

fjimr 

PRIttT 

Ffrm TABC5]:CHR?(7JSCWfi1M3};TflE{5T;CflRtC7? 

fRIHT 

PRINT 

BtD 

PCENT 

PSENT 

FitR Ti 



TAff[iiriiii^ 

■13 TO 1 STEP -1 



22 



11^0 
I2D0 
!?H 
1221] 
I^^P 
12^1} 
I25D 

]2?0 

13H 

1330 
13J1IJ 

5S?0 

1400 
H10 

ii:o 

t*30 
1440 

H^a 
lioi: 

1510 

1130 
15^0 
1550 
15i0 
OJO 
15?0 
1590 

;A2CI 
1A3(I 

Id5i} 
1 Ji^.L 

uao 

1700 
1710 
1720 

tno 

t?50 

1??1] 
1H0G 
IffEi} 
If^? 
1330 
T840 
ta50 

1S50 
1B90 
t'flO 
1?10 
1?20 
lt30 
i^qo 

i??o 

19?{| 
20tl} 

30:0 

2030 
2040 

:2tiio 

2fl70 

20PI1 
2101} 



m:o 



n"i2J«ft7a?nir 



IF T-itfl THEH 1220 

Pfi[jiT r; 
3{}[a 123II 

FOfi :9:=i ro i3 STtfl 

IF f/2"JNT(f/2S THEH 1330 
IF iapV5=0 TH£H MJfl 
ONXCX^T? DQTD ^2-^0j12?Op13se 
PRIBT-K ■; 
GQTQ 1^5il 
FH[«T-?L-"; 

sarn hso 

D=0 

IF lJa^T5-=0 rH£N 14S0 

OH QIK^rJ eJlTQ UfiDpUfllSitWO 

PRI?^T "D "1 

Gara i45d 
pfltiin;-"; 

aC7[} 145D 
FRIHT"D""T 
GOTB f^50 
ftp&*l 
[FU>1 FHEfl 

PKiNT " ■; 

NEXT X 
SJfSUI Ti20 

fRINi TABC 

fil=R' + 1 

IF R]>] THEH f;i¥0 

PltlNT 

PRlrlT 

P R I^T ■ ■ 

PRlNl-TEftfi Art J.rN£' 

PRIHT 

PRINT 

PRINT 

PRINT 

PRE PIT 

I^ETURM 

PUSH! 

fi£TURi^ 

IF B>1 IHEH 1710 

fRINT "I ttOft fRSfl 2p] TH 2^3" 

IF Gl?l THEil !^?^ 
FDfl C=3 TO It JTEP 2 
ICCpC+1J-=1 
TCC-2pC*1 J^l 

HEH C 
T^2,J3=3 

^^7,l^?-^ 

QDTG lUfO 

FAR [|=C43 Ti] fJ STEP 2 

TiC-Zpnj=2 
T[C-TpQ+T5=J 

KEXT ir 

FDfl B=C TO 3 5TEP -2 

rcCpS-1 j=j 
N&n 5 

GOTJ 1750 

IF f^Fl ]"H£H l^iJU 

IF FOFl THEH 1 ?20 

IF 6>G1 THEH 1 ?50 

X=f 

r=B 

oaro T^i^e 

i^fi 

r=ci 

LP rtl^T^''^ FKEH 2J1fl 
TF K>F1 TrtEJI 2OO0 

Q^ tc>:-1hV+i) goto 2oio,zoflo,2im 

□ K HXpT? [jElTD 2010^2*6-5,2150 

IF :t=T-1 THEK 7050 

Orxt2,Tf=J 

?RINT"I HfliJE H+OH 

GQT9 22t{i 

Dt;<-2pT?=J 

PPl*ir-| flOVE FRON "iX-1 

GOTD 2211} 

IF XCJ:-^^T^-M-3 THEJf 2t20 

):(XH^r-n=2 

PRiHT"t RflVE. FftJfl **;lti;'"p"rTH;-Tn ';x^-3;'^■;T-l 



'jKf3;^'?v-i;"Ta ";i+3j%";vti 



n i 



-T-i;-TO "iK-i;",-;!*} 



3110 
3120 
J130 
2140 

2IA1} 
21?l} 

21G0 
2170 
2200 
2210 
J220 
223Ch 

2230 
2?ii0 
2370 

2!90 
2300 
23lf^ 
3310 

2330 

2J70 

23fl0 
7390 
2tl]0 

:;*io 

2420 

ma 

2440 
J451J 
24^0 
J4^0 
2430 
24^0 
2500 
?510 
2520 
3530 
2540 
2550 
25^0 
2570 
aSBO 
25?0 
2fiOi3 
2ti10 
262i 
2fr30 
2440 
2i50 
2U0 
2470 
2i50 
2*90 
2?i]0 
3M0 
2?20 
27J0 
2740 
J7S0 
2?ftC 

:^?7^ 

2?GD 
27?P 
^&0I> 
2BH} 
2821) 
2930 
7fi40 
2850 

2S7D 

2fleo 

2fl?0 

29i}0 
2910 
J?JO 
29J0 
?940 
2950 

2?7fl 

2?eu 

lOOH 
30^1} 
Ok 



0(X-2,T*25=3 

PRIilT-I ftQUE FSOH "jK-i-T^jT^irTa "{j:":i\";^*3 

QOTO 3210 

If :tCX-1pT+]i^3 THE* 2190 

nj;-M+t]»2 

rPIffT"] HAVE FRQK " px-i ;'^" ;Y*i j ^to ■;x+t;",";1■^-l 

&0T0 2210 
J(XpTJ=l 

PKiNn flftVE FROU ";3;i-ii"/"iT-i:"Ta "ii:+i"p";Tti 

R£H ERftQI: flNIi CJffl^Et 30 MD SlJfift30TINE«««w**»#M»#t^«t"**«**« 

IF fCF] THtii 2^E:i3 

IF f^l THE J! 2i30 

IF Fi|3 THEN 2i30 

IF F1 = 13 THEJ* 2i30 

IF lj = &l MEfl 2*30 

IF F/2 = lNHf/2J THEN Jd30 

IF r; = 3 TffE^e 2^30 

[F B>;2 THtN It^^ 

[f 6/20 IirTtB/23 THtH 2iJS 
IF FOrqrCf 3 THEH 26^0 
IF F-^1 TI^EIf ^i3e 
IF fi<1 THElJ 2430 
IF FI/2>IllT(f1/2} THEN 2U0 
IF FI>I3 THEH 24JO 
IF Q)»Z lNt« JiJO 
IF GJ/2 OIHT^01/3I IHEJ* 2430 
[F FK-^lNTtpt] FHEi* ?£3D 
[F GK1 TJfEft 2d3i} 
[f FfFI fffEH 253a 
IF at/OI THEN Ji,^? 

If flB51F-riK>2 THEN 2i30iJiLft FRIHT E^RIffi 
If f>FI THtH ?*90 
IF 0[FTfl}=>2 THEff 2630 
IF C[f pe?'3 THEH 2fiJi} 
J1lFhG1=2 

30T0 27i]0:fiEtt PE FUR^ 
IF QfFlpGl J=2 [H£^ 2^30 
IF U^F1pGn=3 THEN 2430 
O^FljIil?-; 

GGTG 2700± HEH RETURN 

[F flS5lG-1i1^-^^2 rW£N 25Je;fiEri FRIHT ERR?R 
Si^GI THEff 25^0 

^::F'EtG-*i i=2 THfN :^d30 

):(F-l^G4n^3 THEN 2430 
K^F-t,D*n'3 
GflTd 2?01]:REH RETURN 

TPfEN 2430 



EF 



IF NFl-lpfl^-tt 1=2 



■raufi jioijE fRGri" 
F^Q 
■TO-; 
FUOl 



n filEP 2 



THEH 2320 



IF i^Cri-TpBE-H?^^ 
JIFI-l,fi1f1?=3 
OJ^IO 270i^;PEtt RETltRH 
PRIHTnNtfrtLJD rtOVt — TBr WJftlN' 
PRIRT 
fRINI" 
TN^UT 
PRINT- 
IN PtIT 
ODTfl ^2^0 
RETlftH 

FOR H=1 Tflll STEP 2 

IF 3ri,H}=3 THEH 2770 
Nf!T H 

GOID 3000 
FOR J>3 TO 
1-2 

If ni,Jr-3 

NEIT i 

GOTO 3000 

I = Jt^ 

IF 1=12 THEtt ^970 

IF I4I^JJEJ [|i£M Zflf 

IF K(lt-tpJt1^=2 THEH 293Q 

Ef J-KO TH^H pg^O 

If I(T-lpJ-1?=:2 FHEH 2?50 

:F0a*1,Jt1^ = 2 TMEf^ 2'^30 

IF J-UO THEN 3000 

GGTfl 2S0B 

1=1+2 

60 ED 2ei0 

J=J + 2 

eotu ?B30 

J=J"2 

eOTO 2flJD 

IF DC1,JK>2 iHE:H TCJUO 

f^fEhT-rOlf HEN in COHGRFiTULATIDNSi 

E=3 

EETURlt 

ENIi 



S3 



Camel 



tJAH^ ft H£U CJihEL *«& fi Ntl* &flrtt "^ T 



In this game of high adventure, your 
obiecl IS to travel 2Q0 miles across the 
great Gobi Desert. You're being chased 
by & Iribe of knock-kneed pygmies- 
You have one quart of water which will 
last you for six drinks; it may be 
renewed if you find an oasis or. if you 
ere-foundbyanoihertraveller.youmay 

gel an additional half-quarl of water. 
During your journey you encounter all 
types of hazards such as sand storms, 

wild Berbers and possible injuries to 

your cameL 

Warning" thfsisa very ha:ardous and 
addictive game. Lt is also very dtfNcult 
to win In ten plays o' Ihe game, the 
maximum distance we were able to 
travel was I59mlles. and in many cases 
we managed to make only seven or 
eight miles before one ot the hazards 
caused our demise. 

This game was submlltad by the 
Heath Users Group, 



UM 



ctEflTi-Jt cijn^uyiNfi 
flOf^RISTQUlf, REU j£GS£f 



JOl>Ll^ VQU LIKE [HST«DCrtl>t^S7 TEQ 

UE-LCOMt T(l CflnEL. THE BEJ^ST IS Til TRAVEL 
>0O hi.FS ftCRQS& THE GPEAT 6Dtl iS^EfiT. 
^ TFTEEE ar rwptKEt i:KEEC flljrt3£? UILL be ittrtSIWS TOt, 
ffllj URL B£ ^SliED FttP COJIhAJtSt EvERT 3D OfTE^, 



I M H fl H H ff ? 
DBTrtli FfcCfl rOUE: CAJtTES^ 
jif^EAE itl^HERATE SPE£P 
ftHEIili rULL SFEfEi 
5TgP FDR THE tt[OHT 
STflrus CffEilK 
HUPE Fflft HELP 



TOL- HflUE Ci^t OUflffT OF tfilTER UHICH U]Lt i-ftST TDU SU TiRlifKS- 
tflU flfil^E REttEiJ TOlJfi UliTER 5UFPJ."e tOIFLETEU ft? AW Ofl^ES, 
TDU fiET ft flflLF fl QliftRT Jf FDUt^fr Br }ieLP- 
]F HELP EiOES HOT flNl! rci^ ftflER CDflHrtifn ^^ ^ TOU LO&E, 

scan Luch ^tfji cQ^u tAflfiaftG 

tilU ftHE IH 'ME nmtiLE DF rriE 

■^Di; Hft^iE TRALiELLEC fl HILf5 

\^^C\1 ]^ VDUP CPntlflKD^ 3 

royfc Ci^MEL IS BLJ^rilrii] ACBU^fl THE E-EiEKl SfiNI^5. 



I>E3£RT AT A^ DASIS. 
ALJ.1[}4ETH£S. 



19U HAVE TRflUElLE& i niL£S ALLTdCETHEt- 

;iufiT IS TDtl? CDH^.AND^ J 

IDUR EflflEL E3 EUPHIN6 flCSC35 THE BESEPT ^fiNt£. 



rt e 



— --U A E II I 

riilj Mfi^'S TEPVELLtB 
UHfil IS "^DTJft i^flflhAi^CT * 
ta\}^ CAflEL IHANt:^ rClUL 
THE fTGHTES HAVC CftPTBRfl 
HETR rAVOftlTE BI&H ■!!■! 



^ E?ET fl DPlHK 

RILES flLLTDij£THEft. 



TDLf- E:.^f^EL flrt'D PEUPLE 501^ 13 



IJDDU LEJCK ArtD GftOD CliftEL[H6 
XOU ARE Ih THE HIBCLE Of THE 
fan jlflVE TfiftVtLLEB MILES 
UKI13 IS TOUR CO«Mli«Ci^ J 
VOUf: CflftEL ]S BURHjMD rtCRQSS 



MILE& 

2 
KftCE, 



EiiSEtf AT fi^ DASia. 
ftLLTOlJlEHER. 

THE BESEKT BflPlSS* 

A1_LTIIlit1H£R- 



5ET 1^ DHirtf 

S IILLE5 JILLTQMIHER* 
]? 1 



P: D^IN^ 



^Htl H|IL'£ TftAyELLtn i 
UKftT 33 TDl3fi tahflftfll"^ 

tcuJ: camsl lckeb this 

-J ,:, R « I ti 

im ttAyt TflAy£LlEI" 

llHl=iT ]S TDUf! CaMMAKUl 

BiTTEl: UftTCii tt^R ftH DA3E3 ■ 

UHftI IS roaR CDJihfl+ID'? 2 

fBU HAVt BEEii CAUGHT LK i^ ^SAHCBTUR^ . , * - - GOOB LUW^ 

YUUJl MEU POLITIC!*! E3 J^ itlLES SU FAFL I 

milP CftntL L3*:E3 THIS f ACE. 

THE ^TSflEES ARE lO MILES PEHlNt fOU. 

TDU Hft\"E TRIiVEtLEI} 1^ hlLE^ fliLTCPETHER . 

UhAT 35 TDUf: CSMiiftNCl^ i 

rfliJ IilHTT ftilPSCALLIOP^i tOU RAi* TOUR f9M CflBEL ID BEATH 

tau DLEB IH THE HE^EUT* 

YffJP ICfrV 1**13 EnrtJ* Bt tHJLTUSES ftNJ IflPOtlEI CAHHIM&flLS 



UiHT A hfy EJiriEL flftl: fl «ry DANE ^ T 

GDDH L^Df: A3^I? SD^B CH^ELtM^ ■■ 

Y3U fiftE IH THE HiiBLE OF lH£ BEBEI:^ ftT ftN ftflSia. 

Tfla Hfl'JE :fiiiVELLEl' ft MILES A lLT ItGtl Mf R . 

ytffii IS ra^R tDAniiftEi-7 2 

7eU Hfl^iE fiRRIL-ElJ ftT ftri OfiSH— "^OUR CftNEL I& 

F1LL5H& T&Ufi :AHTEEN AHlI tftTIHfl FJC£- 

TCiyh CAMEL L:r!E3 THIS PftCE. 

TBU HAV£ TflfiVELLEl! 3 M3UEf ALLiDQETKE- 

MltftT S3 "^DJJR EtMflKli? J 

Y5UB ZAntl LIKEE THIS ^^ftl:E . 

TBU h^V^ [fiflV^LLEt n RlLtS ALLrUeETHER- 

ti}lAi IS raiiF. tDtiHfl«E:i :: 
fIfljR DAriEL Llt^ES IH3S PACE. 
U ft J II ] H S * GST 

TIE PTJll-IES AftE 7 filLES SEk3?Ji: VDU. 
TDlt Hfll^e TSA^ifLLEI- 14 ttlLES ALLlDSfTHER- 
UH*T [5 fGuR CQHMAii::-^ 1 
LETTER L'flltH FAR M^ flj^SiS I 

l;^^flT 3B vbuf cBfiftftwB^ :^ 

VSUr. tAtiLL ^JST HL^ riuriP- 

miKlLT THE PTBfllES UERt ftHJTHEAftf " ' ' 

rnuR C^HEL LUES THIi PliLE, 

TkE P"^SMIES HHE 11 flJ^ES B£Hi« Yfll- 

TBLI HJiirE TRfiVELLfD ?1 MILES flLLfOQElHER- 

UHAI lb -CQUft CDMftAMST ? 

tDUR CAAEL LIKES THIS P*CE. 

TRE ?r6ME5 ftRE 15 fi[LE5 PE^iKB TBLI, 

IBU M4VE Tftfl-JELL-B JS nlLEB AUrOliETHER. 

UHAT IB TOUR C&MHftNDT 2 

¥iiy HJii^E ARFl^VEr AT AH DAJE$ -^UUF 

fULltrio tQOR EAMTEEtr AHU EATLMD fIG3. 

^DifR tAHEL LIKES TJt[5 PACE. 

THE PrflR3ES ftRE 13 ft^UES EEHmP VflU. 

TDU HflX^L TRAVELLED 3^ n3LE5 rtLLTBGETHER^ 

UMAt IS TD^H CCMHANVr Z 

UILD BESEEftS KID[J£N W THE SAHC N^--"E tflPTL^Ril? J&ti. 

LIICKILT IJIE tQCAL SHE.IK HAS MKtZ¥ TD THe3R RAHSHti- 

TJEHRMB^ BLIT...*.*^-»iftTCH FDt TkE f^GHIES IM 

'im H44VE A «EH CHOICE DP fiHB-CflHMAKDS : 

« ATIEftPl A« ESCftfE 

KB UitJT Fflfl fftT^EMT 

TIUi: BUt-rDrtfiAHD t ? 

ccH&Rfttu^AUDrts, totf ee;[:c=£?'^ullt £S{:apeei 

TH£ FTOKlEB AFtE 4 HILE3 ££HlHIi TUUh 

TIW ItAVt IfiflVELLEU 3? flllES j^LUOflETHEG. 

bhi^T 3S iQUP CQhnAr^H^ 4 

fHU ElEIi [« THE i!£.3JRT, 

THE LBCAL SHEIK flOi* USES TDuR SKULL 



CAMEL I? 



F' I I 



TDrt A DHAHOe PlffiSE 



SfftNT A HEH CAPltL ArtB A »fEki Gli^E T HQ 
CHlI^KSn 

24 



t.15 

10 

2^ 

J-J 

35 

iro 

131^ 
1^0 
150 
UD 
1?D 

:?ao 

[210 

2iO 
^^0 
275 
27£ 
27? 
JJB 
2J? 
^BD 

3Hf 

330 

J40 
350 
J 55 
3A0 
370 

3?i) 

411] 
liti 
430 
440 
^50 
4&D 
^70 
^SO 
^?0 

5511 
^^Q 
n7{> 

3?i] 
dOD 

d2{i 
ii9 

i30 
iS^O 

tiflO 

7Qa 
710 

/^D 
7J(i 

/50 
^40 
7?0 
?flO 
790 

BIO 
[?3U 
B40 
a 51} 
[i44 
570 
rfSO 
:J"*0 

=?:o 

?I0 



TOU-' 



#t Dtlhi: FRUft lOyfi CANTtEH^ 
UllEilD nOBfRflTE BPEtB- 
ftHEftli F1*LL SFEEP" 
STOP FOt T«E NIGItT" 
STATUS CftELK" 
HDPF FUS HELP" 



"11 J 
'Hi 
■114 
^(15 



T 

PPIWT T<^B<2iJ;'^CAi1El" 

fRIflT TAB<20J;HCfiEflTlUE COHPUTlriG" 

FRIflT lflBMa^;"HflflR!9TUijflp flEU JERSEY" 

PRIrtT;PfiJtfT;rRII*T 

PKINT "UQJLB TOU L]>E( iJI B FflUi; HDHS*' ; 

EMrUT HI 

If L£FT*^B*Tl3^"*f' T*N 3213 

P«INT:fRIHT " UElCUHE TQ CAHEL. THE DSJfSr 15 TO TRrtVfL" 

PRINT "ZOU ttlLES flCFcDSS THE DREfll ODBI LESeftl,- 

PSINT "A TRIflf Of K»fQCKEIi *LNEEJi PH^rHtS WJU &E I^HflSiNlj 

PRIHT -rOLT IflLJ. tE ftSKEL FOR CQrtHflflllS £"J£R"V SO JJFTEN*" 

PRJNT 

PRINT 

PRIHI 

PfiJNT 

PRlJ^r 

fRIMT 
FRlJfT 
f AJMT 
PSINT 
PfirNT 
PillNT 
PKINT 
PRINT 
PRff^T 
PRIHT 
PRtJfT 
FRIKT 
PREif^ 
FAI#T 
fAi^T 

If CJ]?9 

Z-I-t 

:r ;=] nfEH 

If z^o rtiEM 
p-pti 

S2*lJITnO*RH[i11]t7,J] 
IF 0>0 TH£N ?40 
IF P<^ TH£N ^^D 
Ll-i:]tK2 

IF j:3<c then «o 

Plr[*jl "THE PTliHIES HrtUE CfiPTUREB 
ffr[«T "5REIR FAVORITE |iIS« Mil" 
GOTO 1S60 



TQU 5]J< DJ?I*fKS. 
AT AJl OASES. ■■ 



■■VGI* htJ^VE QME UOiiRT OF WflTEK UJilCH If ILL LAST 

■TO*] hAVf REN£U TDUR tfATER StlPfLT CDHPLEIEO 

~TI?ll QEF A JIAlF j^ dUAI^I IF FGUNB Bl HEJ.!" . " 

'^IF «EJ_P BOfi NOT fIN& ^BU AFTER COtthANH 5lK, -VOU LflSL 

"&0D& llJCtr J^NIi OflDH CAHELIITG I I" 

"TBU ARE IN Tut fllBBU QF TUt JJt5ERI ftf AU OASIS." 

2000 

:ti£H 



1211 



PRFhT 
4d30 



U A B « I PC G Qtl A BKINj:- 



fQU, CAilEL AftD J^EOPLE 5Clfe*P IS" 



MILES BtHie^B TBLJ,'* 
PIILE5 ALLJUljtEHtR-' 



PRINT "Ul PiCMIES ARE "C-C1(- 

PRINT "rau HALfE trjiUELleu ";j.;" 

PRINT "UHAT IS TOUS! CDhhANO"; 
INfUT Y 

CH r GaiQ a30,icti,itOp7iOp/?o 

T = INTClCTflnpni^ 

IF lOI rHEH J200 

PR [JIT -HELP HAb FDUMO fQU Ifl A STATE DE aWCONSC lOUSWEia * " 

(l?fir 340 

F=F+3 

IF F^a THEif 1l?0 

Ij05UB RSO 

:^l=lMlli]*Rri|i{m 

C^C+K1 

PRINT "iyUFT CrthEL LIKt,^ ThES PACE*' 

GOTO 340 

F=ff3 

IF F>7 TH£f( HTO 

irosu3j e^o 
xi=?*inrcrjT;trJi^C5 \'} 

CAHEL 1^ BURMflie flCBOBS TilE HESEJ^T Sd4t^P5." 



PP-iir "TOUU 
PI!E*IT 
GSTO 3^0 
PRINT "tOUR 

F=a 

GaTd a^o 
PRINT -TGUR 
PRINT -TQlT 
PRINT "TO^ 

IF S-^fl 
S'Riflr 
Z-4 
GDTC 4 
A=EHTC 

PfiINT 
PflHl 



EiAh^L 3KA]1KS TOUi 



CAMEL HAh 
JIAVE "jSr 



DRINhS 



DUOE^ Dj^TS LEFT." 
LEFT IH TfllJH i:ilij 



EEH." 



CAN Gfl ";Zi" COtlHAIflifi HITHDHT DRINLlLNli, "^ 



THEIf 1200 
PEITEFL UA^Ch 



Vf}k AU UASfd r 



IOl)*£NDf1>} 
TrtEM 1t2(} 
"UlLli BtRpfRS F*EiriIE« IN THE SArlff tTj^Vf UArTUTIEIi ^ntj,- 
"LUJlKlLy TRE LflCAJ. SJJtlK HM AliKEED ED TKElFc RAilSUtt-*^ 



?20 
?30 
940 

^40 

^?D 

VBO 

9*0 

1000 

10]0 

1020 

1030 

1040 

1050 

TOfiO 

1071] 

10B0 

JD?0 

lOfS 

10^6 

IJOO 

1130 

ii;o 

1130 
1140 

TT30 
■ llfil] 

I I7fl 

II BO 

11 ro 

1200 
1210 
1??0 
1230 
1249 
1250 
1^40 
127i> 

Use 

12?0 
1300 
1310 
f320 
1130 
U40 
1130 
13A0 
1470 
13110 
I3?a 
noo 
1110 
K20 
1130 
IHO 
M50 
14d0 

1 t/U 
HGD 
14?0 

laoa 

1510 
15?0 

2 5 JO 
I5q0 
t550 
1^40 
1570 
1300 
159[^ 
liOD 
1620 
U^O 
1A40 
1W0 
1d£5 
1457 
tiiO 

vooo 

2010 

2020 
203D 
2041] 
2050 
2O60 
2070 
Elk 



"DEhfi«ilS BUT 

"Toi^ KA^iE A Ntu i:aoi[E 

"H^ ATTEMPT AN ESCAPE' 
*^tte UA[3 FOR PflTIIEHT" 

'Toafl sufl-coHttflKO ■; 



OF 



liJSTCH FOR THE PTGH3ES 
SUB-COflHftHD&r 



II' 



JUST UAIT, 



-roEift 
Fitia.- 



CfltitL IM- 



PRINT 
PRINT 
PRINT 
fRIfll 
fltlJlT 
INPUT 
IF K=fl JREei lOiiO 
XI^INKlO ^ Ht^Ddn 
IF XK5 Tll£i| 1040 

fRINT TOtJlaRftDULflTIUftSp rOU KfCtEStFULU ESCAPEH | M l» 

0=0 

(iOTD 340 

PRINT -^TOU WERE flORTALL^ UjIUNDEI? BT K PIO STA&BER HHIU E5Cftf JJI&-" 

QOTO 1410 

i:i=LHTE100<-RXBM]) 

R£n 

[f iV^U THEN 1100 

PRINT "ICJJt RilN^Dfl HA 5 BEEN PAID ANP YOU ARE FPtEE TO CQ^'* 

D-D 

GOTO 340 

PRINT -THE LOCAL ^ULIj^N IS E:OLLECTIiUj- 

fiOTO 340 

A'IHT:!0*RNIi[1>? 

IF fl>? THEN 1240 

fHlHT ■'VDU HAWt ARRIVES AT AN Qft5E5-" 

PRINT -ffLL]*IG rOOR CAHTfEil A#B £AIl*tB 

? = 4 

3 = 4 

RETURN 

PRIilT "TOU BlITTT RAPSCftLLlOF^" rOLI firiN TOUR PW]? CflHfL TO BfflTH 1 1" 
GOTO l^}<\ 

PR[^T "TaU i/]N, It PARTT IS BEJltG fiFVEB IB TOUfi HDMllfi....,.,- 

PRINT --„,,,. THE PreJtlES flfiE PLAilNINS TO UTTENO " 

BOTCl 15£0 

X1 = r(fTU0O*llNIiilJ: 

IF XS>3 TttEJI E35fl 

fRINI ^VOU RJiyE £EEM EAUflHT IJt A SANDIiTOBH OODD LUCK1" 

J:?^ENTU0*RMMI) 
Kd = INTnOfFrNDUM 
]F X«<5 IH£N 1321 
C = [;4K5 
CaiD F330 
[:=C-K5 

PRINT "iOuR NEW POSITIDrl IS "EC" flILES SO fAR<" 
HETURR 

KI=INTnOO^RjrB1N} 
IF XI>S THEN RETURN 
CTiC141 

PtIHT "VOUP CArtEL HU*fT HIS 
PiritfT -LUCHLr THE PTGrtIE*5 
R£Tt>RN 

tJ>INTnO+Ri1Dn]l 

PRIttt "ifll^ trED IN THE DESERT." 

IF U>1 THEN M60 

PRINT "THE ttfttlOHAL CAHEL-'^ IfHION 13 NOT ATTEfffllNQ lOUfl fU^^RAl'M" 

GOTO 1360 

TF U>3 TH£N 1490 

PRINT "roaR BOor 

^QTU 1540 

If U>5 JRErt IJ20 

PPfJTT "TRE LOCAL 3REIK nau U£E5 TJ?US SKULL FOR fl tHANGE PURINE Mi" 
GOTO }^ii\ 

EP U>7 T^EN |;S0 

PRINT "PEUFJ.E WITH LITTIE iNTELLiGErtCE SHOyLET ^TAT OUT OF "THF DE^Clf 
540 

"TUHKErS GHOLtS FLTp NOT RILE CflflELS l!"M!"» 



RUHP.^ 

VEfiE FDOTEIEAfiY 



III" 



HA5 EATEN El" '-'ULJUftES flttB aHPGRFED CAHWIMBAtS 1 1 T' 



liDTO I 
PRINT 
PRINT 
PRIHI 

PRINT -IIANT A ^EU CAHEL AND A NEU GAAE **; 

iMPur 01 

If LEfTlLlit,)J-"T THEK 320 

bOra 1650 

PPIHT "TSU RArJ OUT OF WAFER ISORRr CHWIJi J^ 

SOTO 1410 

PRINT ""- ■ 

PRINT " CfllCKER^' 

PRINT " '■ 

ENO 

Z=4 

S=fl 

C-0 

CliO 

[3 = 

F=0 

f^ 

RETUlTff 
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Chase 



CHASE puts you in & maze made up 
of hlgh-vollage fences and posts. Thi5 
ir Itself Isn't too u n pleasant but there're 
also the five interceptor robots benl or 
|usl one Ihing— yojr destruction. If 
these robols touch you ... that's the 
end ol the game (and youi) There's 
one hope— make the robots hit the 
maze, or each other (Ihey're like 
people— sometimes they'd rather be 
alone}- ir you destroy them all, you win! 
If you find yourself In a totally hopeless 
situation, you have the option of 
making a tremendous leap to a random 
location (whfch may well beon topofa 
fence or a guard). 

Al the end of the game, you may 
replay with the same or diderent 
starting conditions. 

1 be h eve this game was originally 
created by Mac Oglesby. It was ihen 
modified by Bill Cotter and further 
improved by Arnold Loveridge. An 
m termed ia re version appeared in 
Crsaffve Cctr^pufing, Jan/Feb 1976. 
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■rCHJ ME IflTHrH the JlftlLS Uf il Nlijri 'JOLTAGE M^IE 

rJi£RE frftl FEVt $ECUR[TT ^IfrCHIilES TRTIHij tC nES^ftUr tMI 

>{IU IlFtE IHt '*' THE IHTtRtEfTQfiS AFtE Trt£ '-^^ 

THE AFrEflS HftflKED 'V AR^ Hi&H "JQLEflGE 

VDUR DP^Lr CHflWCt FflF SU^I^^llWL 13 TO MAHELJVEft EflCH- ^ 

IKTERCEPTlfR INTU ^H '^^ [fOi!& LlJCK- 

naves urcE ?.s^^ 

If ^ IfC! ^OVE Fl]R IHE AEST OF TftE l}Ant 
~1 = ttA'JE lIFi SlTLflTlflH HOPELESS, 
D = A TREJtEHtOir^ IHJT LJHf Oil Hi Mfl TEH SftNDtth^ LEfF 
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LIST 



^_ 



10 

20 
:3i] 

^^ 

?D 

l^C 

9C 

150 

115 

120 

UQ 

HO 

150 

UO 

17D 

ISO 

1» 

220 
230 

i40 
250 

7?D 
2fl4 

J»0 
JfO 
3?0 
330 
345 
3111 

J?0 
3»0 
3^0 
400 
4)0 
42fl 

^40 
^50 
4dO 
4?0 
4 BO 
4ffl 

320 
510 
5^0 
5^0 

570 
3»0 
5?0 
6n 
^10 
^20 
630 
d40 
A 50 
AA^ 
6?^ 



pmr YrfiT2fij-^Ch*g(^ 

PFr|HT:PRINTrfF?iJJT 



^HEfiE AR£ Fiy£ 
"TDU 5R£ THE ^*^ 



"THE ^R£il5 MAffKEC 
"TOUR DNLT CHANCE 
"INTERCE^TflR INTfl 
■naUES ARE 



THE UJ^LUS 3F A dlUH UQLTAGE 

^EClfRITT HftCHIHES TRriWG Tfl 

THE IMTfRCfFTDR5 liRC TH£ 



FQft 
T-2-3^ 



J4R£ HIGH 
I'. 



^QLtfl&E" 

IB TQ MHEUyEft 



■^10 » 



HO MIVC FflB TrtE REST OF THE OAflE" 

MtfE BPp llTflflTIBN HQPELESS.'^ 

A TREHEWDDUi CRUT UHFORFUHrtrELT RflNffOfl? 



PSINT 

nuT 

PfflNT 
PfiiHT 
PfilNI 
PRIHI 

PfilP^T 

PRINT 

PRIJIT- 

HlIlfT 

FirZlIT 

psruT 

PRINT 
PRINT 

FOR tBl m 10 ^ 

FOR C=1 TO ?0 
H-INTMO^RNBn)^ 
JF K=5 THfN 270 

OOTD 205 

tlEJT C 

FOft D-l fC fi" 

rt(Bpt5^flSCr'?:"?:ACB^?5]=fl3[;c 
NEXT D 

fflt f^: TC 20 

ft[] HF}=fl£Cl'-njft{10,FJ=i»3C(-'I 
tfEKT f 

aOTfl 41CI 

H-IHTC2fBtRffDf1l? 

l=INrCi+1R*HN&Clf? 

IF fl(HpIK>ftlH-_->-TlfEM J70 

KEiyatf — -- 

BDSUe 379 

JiHiK=I 

FAR i*9--l ro 5 

etauff J70 

ft^*lTlh=fiSCC"+"I 

J.Cil?5-H;m«?? = I 

ifEHI^-JI? 

FOR ft1«-l ra.10:FUfi 



hfliE- 

BESTROr 



roti" 



Ej^CH- 



LEftP' 



K"] 



/ 



£2=1 TR 25:*lf»1,B2]. 
FOR B1=5 Tfl aiLlCB1?-LCBS^iftHI|j>nfB1? 
J1=J;H1=K 

Fflfi D7=T TO 10 
fOP B2»l JTJ 25 
Ul=CHRICAC|i;^B2>J 
PKINT Its; 
NEXr 62 



■A4B]7B2^ 



rfEn f2:NEn £t 



i?0 

7ee 



PRINT 

[fExr d:2 

If T? O 10 rrtEH i-40 

PPI*IT 

aCTQ GfO 

INPUT T? 

J2-3JiK3iK 

fP r^'Q THEH £60 

IF f? < THEN 12Je 

IF V¥-Tfl TttElf 10^ 

Art T? UaTO a^5peChDp7E 



1^840, li?5p76a,7O0^72i?p74C 



^10 
?20 
^30 
?I5 
75 D 
7ifl 
775 
?90 
7?0 
GDO 

Hia 

910 
BIO 

m 

?J0 
570 
JJBO 
BVO 

■^m 

9Jfl 
?40 
?10 
9£0 
^^0 

V^O 

1005 

lOtO 

1524 

M30 

1040 

11150 

IDAO 

t075 

10S0 

10?5 

HOC 
Iflil 

112(1 
If 10 

IHO 
1350 
1U0 

-r!70 
ItBfl 

11?fl 

1250 
1210 
1220 
12J0 
T?+5 
1250 

127C 
12R0 
12^0 

tJiiO 
tJIO 
1320 
Ti30 
1J40 
1350 
13&V 
13R0 
1J?0 

I mo 



GOTO 
J=J-| 
OOTD B?5 

SQTD a^fl 
K=Kt1 
GOTQ 890 
J = J+1:K=M| 

an TO e?o 
J=Jt1 
fiori] a?i] 

J"=J+ii|tHf-i 

35TO a?o 

soio fffa 

PRINT '^*i^OBOj500 JUflP" "" 

J'INTC2^S+fZi|Iin } y 

K = INTr:+l8*RN!l{|J5 

fP ACJp*!5=ft3Cr'I"? THEN USD 

flU2pi:2J=flSCC- '] 

fi[Jth£j-fl5C["K"^ 

65TO 1570 

R£H IJITEJICEFTOR flflyCHEifr 

If A[I.T)=rtSEf-JM TMEfl 1040 

S2=X:r2=l' 

X^a0*f[J-X]:Y=l3flN^K-r] 
?: = Kt-I2:^ = S"tT2 
IF ftCKpt?=flSCr">-> THE* 
IF fl[l:tV^*flsc[■ -] TifEH 

ji[?::,T2]=iiSCi- "? 

RETURH 

*irSpr]=A5Cr"4-} 

RETURN 

FDE H9°r TD 9 



low 

1020 



F24CI 



■) THEK 1L70 



60956 ?40 

IF 89 O fl THfH 

L(N^J=K:HCH?3=T 

NEKT N? 

FOR «9=i ro 5 

IF fllHH??pHCil93h <> ASETC 
flc^.c*lP5tnfN?N=ftSJ:^■^-'■^ 
nei:t tff 

FOR N9"1 TO 5 

If flCL[H?3,H<*f?» -<> HSCrX-J TTO SlO 

NE£T N? 

PRINT "-rflO ftrtVE 5E3TROtEIS ALL VOUH OfPOHEHTS - Tfi£ QflHE IB TBUflS' 

GOTO 1??0 

PRINT -UVE UP, EH." 

PRINT ^*« IDU iftVE SEEN lESTfiOTfB »T fl LUCKV CUflPUTER *«■ 

GOTO i;fO 

F*rm "HIGlf VOLTAQEiiHMHTI* 

*tt:** ZAP *tftf TOJ^HE DEftlli 



Pfilaf 

Pfi|«T 

PRINT -flUDTHER BflftE fT/l)"? 

INPUT HU 

IP N9i O 'V THFri TiOO 

fRINT -JfltlE SETUP fT/HJ"; 

INPUT Nr» 

]f J*?l <> ""V" THE* 1»0 

F8R B1=1 TD H]:fDR ff2=1 TO 

FOR BJ-1 TO 5tL[Blh=Llt»l?i 

J=J1;K=K1 

00 TQ 5^1 



'ir^ 



'£0tACBUB2r=j4]{B1, 
flCBI5=N1CBn:N£Kr 
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Chuch-A-Luck 



Pm 



rillFipjSTllUH. PIEU JEHSET 



CHBQSE fl -llfllEFT F^Cl' 1 IB 4. 1 JltL J^OU i UCt. 
IF TfllfP HUlBEf PflTCHEg t flJt, 3 Pflf OFF EVEn fliKfEl. 
TUD DICE, ;i1 3 nJCE, 3l1 



inU UMi t 5M . BAKE A Mf,' 
CIIKi^E fi HUAfEl^'' J 

3 1 5 'v: 

TDLi LOOSE * 1fl& 

fP^' }1AL>E t 4Q|] . Jll^' A SET. 

fHCOSE A NUMnffT f 
3 1 d 

Tou-yi H:^TrHF|i Tiflea^ 

TOU LOaSE I 5f 
TITL' ftft'JE * Z5* . piftKE ft flET. 
^ 50 -^- _- 

CHflflSf A NlfflKR? 5 

5 * 1 

TOtl-'flE MTCHEIi 1 TIRES. 

■T TOO 

CilOOSE rt MUrjBER^ Z 
* 1 3 

TOU'VE HflTOlfEU TTME3. 
TDU LOOSE I KO 
^Ul} hflVE * i^f . MAKE A BET, 
■^ 100 
CHOOSE A HLInfifft* a 



^ ^ 1 

THU-'UE NATCHEli Tl^EB. 
■yiH5 LOOSE 5 1D5 
tilU HilV£ » 2Cn: . PirtKE fi BET, 

[:iia09E A ffUftBES* 3 

rOU-LPE HflTCHEB 1 IIKES. 

:*!GCS£ ft HUi^.EERt * 
3 4 2 

mU^VE JSftTCHfU 1 tlHES. 

rJlU II4V£ 1 ^OD . hiAKE fi SET- 
^ ICO 

"HD3SE ft MU^EER* 7 
; I 4 

■aU'UE rtftTCH« 1 TlftE5- 
'OV^VE UDH V 100 



TDU MfiWE % 3CH , NflttE fi BE7- 

* 200 

CHQDSf f\ KUHBEPt J 

3 3 1 

TffU'-llE flftTCHCI 1 TIBH-- ' 
^l]U-~UE UOM i ?DC 
iflU Nftyp * 700 .'UrtXE fl PET. 

MN'T OET CyTEFH 

VOU HAVE I 7M , hftkE fi BET. 

■^ =0D 

CiiODSE. J4 NUhBEPT 4 

5 3 4 

TDU^VE HjIT-ChED 1 TJFIES. 
YOu-'yE Ufirr i icp 
TOU Hfllif S eoo . MEE A WT- 

3 nOil-' TAKE" I.O,U'S "II 

m HAlfE I BOfl . flflKE A BET- 
? .001 

Oa^'J G£T CUTE"! 

TOlf HftL'E $ auu . MAKE A BET. 

? SCO 

;;MQl?gE fi NUnBERT 7 
CHEftT£||Mfi|! 
EffOOSE A IfUHJEPT 2 

3 i J 

■TDU^yE flftrCHEIf 
TOtI LDgSf 1 2&fr 
TCU HAVE f dOO . PUIE 

1 1 2 

m-yE HAiCffEIi 1^ TJHES^ 
TOtl-^yE U&h 5 ]Z00 
^OU HA^JE * leof . tlAI-j: A fiET- 
'^ IQOO 
CHgM£ A niHIBERT 4 

1 1 t 

rCirV£ HATCHED if TintS. 
YIU LOOSE % II 



riHES- 
k lET. 



LJST 
104 

1113 

1^& 
ISO 

1AD 

180 

1?0 
20» 

Z10 
2?D 
230 
240 
29 1? 
3ji} 

2e^ 

3?0 
JOO 
310 
330 
3J0 
34CI 
350 
3J0 
3?i: 
3El> 
3?0 
400 
410 

430 
440 
^50 



Chuck-a-iuck is generalfy found in 

fairgrounds, cheap casinos, and smaN 

gambling parlors. It flourished In 

frontier America, but dates back lo 

European gaming houses of the 

eighteenth century During its long 

history, chuck-a-luck has had many 

names incfuding sweatcloth. chucher- 

luck, chuck ruck, and bfrd cage. 

Each player places his beta on one of 

Ihe six numbers, one through six 

When all bets have been placed the 

operator tumbies three dice jn a chuck 

cage until they ccme to rest face up or 

drop down a chule onTo Ibe (able. If a 

player s number appears on one die, 

the operator pays him even money It 

on two djce.lwotoone; if on [hreedicSp 
Ihree to one. 

The computer version of Chuck-a- 

luck was originally wriiten by Michael 

Tan off. 



PE I rft f AB C : J ] r CHUCM-fi -LEICK " 
PftlHT- TAfi[ZO^;"Cfi£ATrVE COJlPlPtlXG" 

FfiiHT TAB^ta}r**lORllJSTl^uN. heu jessET 

PfilNTiPtlriTrFfilrtT 

PRIHI 'CJfOOSE fl ttL-flfiEH FROfl T TC i. ? 



HILL 



*lftUHE& 1 
3 BKEj 






PRIifT ''If fjful! NUMEE 

PPMy "T"ll& D[C£h 2:" 

fJ!I«T:PR]*iT:h=30O 

PfiINT -TOU Hi^VE I'-^H;". MVt A BET . " 

EF t > H THfN ^rO 

fF B > rUfW IF l*1l>0=IHTCBtrOOJ IHEH ?« 
GD70 420 

PfifHT ''CH&EPEf A NUftlEFr-; 

JHfUT H 

IF INT[«f=N AUD W > flKIh r^ .^ ? TH£H 
PFCltfT "CHEATED" "n-:Q|)ji] 2jj 

AirifTCfih!HI]*63 + i:fFEIttT A;'" 

C = IriTLe|f[in?*iJt!-PRIIrT" C-" 

T-0 

If A=N THEi* T^T^I 

IF &-=rt IKEH T=-Tt1 

IF C=« rH£r^ T = Ti-3 

"INT "TPH-'VE HATCHED *:-Jj- 

QH J SOTO 3eO>5^DH*UO 

PRINT -YOU LOHfE *";E 

N=*i-fl5EF h^' THEN 4J0 

ton? 1EC 



RK-L a DICE.' 
I PAT DFr EVErt PlOflE^. 



370 



";:If=lJfffft?^P[l>*t)4|-Fi:iNI 



T!ttE5,^ 



PRJtfT 
fRlrfT 
PHINT 
PRINT 
PEltfT 
Pft]«T 
PFtlHT 



"TOlf^yE UDtf l"iB(fl=rt+Bil?OTO TSO 
"TQU'VE DON »-;t*2:K=H-F?*B:GQTQ 
^TD-J^UE UdN *^frt3;h.MBtJtfaTC 
'I HAN' Tfll'E I.O.LJ-S I iii-i&riTD 
-IiJfN'T GET CuTt^'r",'Gf|?o tSd 
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Close Encoumers 



\n this garre, you are situated at the 
center oi a target area (or a UFO The 
program assigns coordinates 0,0 to 
your localion. You are given Informa- 
tion as to the course of the UFO in 
degrees longirude and degrees latitude 
and also rt& speed. Vou then have two 
alternatives. One, you can artempl to 
shool the UFO out of the sky with an 
1CBM or you can do nothing and hope 
thai air friction will cause the course of 
the UFO to deviate or lo burn up. 

A knowledge of mathematical coor- 
dinate systems will be of some 
assistance in winning this game, 
although you'fl probably be able to 
dlscovera reasonably good strategy by 
yourself using trial and error If you play 
enough games 

This program was originally wntfen 
by Chris Falco. 
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CLOSE ENCQUMTEHS 
fRtAT|V£ COMPUTING 






HEAB»[t fDfl lAPhCT AT TKAT LDtm^lOP^ 



A. HFJ] IS 



AT FIITST TITACK, tBE UfO 1% DH ft CQUBfiE OF 55 fEOJEES LOTOITUIE 

ArtH 133 kEGrt£E.5 LliTITlfDE. 

[M.S1] IT'S FALLING AT li SPEED OF 254: niLES/PEB HDU»3 
VDU ilAiJE THE FQLLfllfLllll ALTERttATIiJE3 : 

A) TflU CAM AREHPT Tfl ShQOT ^i^£ UFO DOT OF THE SItt- l>R 
I) TOU DAM lift HDTHING, AND HOf£ THil AEft FRICTION 

UlUE, CAUSE THE DCTIIRSE DF IH( tlFD TO &EVTfiT£p AMD THUS 
f1[?? Ti^Ut !.1>Cj4T10H. 

HHAT IS 1BUB PLftIf Cf ACTIttN (A CP Ef? I 
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^352t 


4 


£5 


t7 


^^3:^.^4 


37626 


'1 


V 


m 


^323. 5? 


i^^K 


-IJ 


79 


107 


31'B.72 


t^^?: 


-1* 


■?D 


114 


21^11. (1? 


711A2 


-ai 


?t 


10B 


?7Ci . 1 1 a 


74^54 


-2^ 


i3 


1U 



IHPAtT-AT- 79371 -fl [L£S-PE«-H0UR — " 

ijBQD UORHh Ft|CT[Qh OF 5 £ HAS Jli^USETi TH£ COUPLE 
OF T"H£ UfO TO &EfTAT£. liPjlCT CD Ijfi D S N Ji T£ S ARE 
HeU C 5 1-3 ?, fOtl MJiDE ri' 



UUMCH iU4 I.C.B.M. Dtf A COURSE THIiT VILL IH^ItCEN THE tfFQ 
tflTHflUT THE UF^ BtT-^C TOO DLftSE Tfl TOUR LOCAtrDJf. IF THE SPtEl 
DF T14E UFO Ei^CEED^ 1^5^? H.P.N.^ TDtJH flISSILES ARE USELESSL 
"SCAHttElr& FRETHCT TBU HAVE 5 flJIIlfTE^ TJ AtfSTRtf THE UFO 
BEFORE TT 1^ TOO CLOSE TD JHPACT. 

--COHfUTZR INIIICfllE5 COUCIE AT FIflST SI6KT[WJ I5 APPnOi h J4 

TTPi ID A CaimSE •■ T^e CbAJtl KELDU 



llttE EPEED LONEJITtTTiE 


IftTITDBE 


C0tJf!5£ 


fl 252? SI 


105 


T 60 


.S nflO ti 


107 


t n 


-rHU ftFiC EHT DP TW EifQ-^S CBORRI^ATfEp 






tiDifEVER rifiS S3 DMLT A SLiliHT K^lAlIQEI ^(1 TJIE 




UFD HAS SEEM DESIftOTIBi 






THr ABAlii^ YC8 






riAH ^A cn A?-T A 







— Si:AiiNEf!S fPEiin -rmj hai^e ^ HinifTES td destrot the UFO 

BEFORE LT [5 TOO CLOSE TO IttPACT. 

--COflPUtER IHDlCi^TES CBUffSE AT FIR5T BLSwTlHO 13 APPftQi:. 77 
TYPE IN A CDOREC DK TftE CNAAT lEtOV 



UflE 



8PEE1 






5122 


,5 


i317 


1 


fiO?? 


1.5 


1547 


FflHTASTICH 


I roij 



LUNdTTUIiE 


LilTjrUl?E 


COGB 


47 


133 


T SO 


41 


107 


T Bl 


IS 


IChI 


9 to 


If 


T3 


^ ?! 



TOII HIT THE urn EliBCItT DH PRQJCCTED DOURSE 



TdJ BilSI t£ VtGT SJiAErr' 



30 



in ftljillW' YE? 
PUN (A OR B>' 



fllLES 



JPEED 



12fll)C 


23^2 


HS5?.3 


85i5 


n^2B.3 


U72A 


11^5^.7 


1iJ07 


1 1 ^3^ r 1 


1^21? 


]0£Ci&.H 


Z177i 


1D0J6,? 


3Z39fi 


flSi^.DS 


15 DBA 


Bei7-?3 


3?ffii 


eof*^?-3 


43^35 


7ZBJ,7B 


^Bil7 


i^oi>.5e 


529^^ 


54^1.1^5 


575ilJ 


43?5.5Z 


fi3?74 


3236-52 


d7M0 


2{^4B.d3 


JSii^J 


7?C.?01 


pan -AT- 



LQMIjITUfiE 


LA!irU&E 


ClHJRSE 


?e 


in 


S4 


31 


?9 


i4 


SI 


?3 


?a 


44 


?2 


fr4 


37 


efl 


47 


Zi 


79 


5» 


3fr 


7fl 


99 


23 


77 


ia 


If 


l^ 


72 


l( 


70 


72 


U 


i4 


6i 


T 


^2 


A? 





3? 


?a 


-Z 


^0 


ae 


-B 


fl7 


?i 


-H 


^^ 


71 


-IB 


3? 


73 



7?5?2 -niLeS-PER-«OUK — 

scao ifEiRi:, fticriflw of ^ t has cftusED the coirbe 

Uf TJtE Uftt ra IiELilATE. IHPJ^CT CBORDIHflm ABE 
NDW [ fl .-fl K TOIJ HADE 
TFrY ftfiAIH-T T 



IT" 



hlLES 

12015(1 

1170^.4 

I13M.3 

11114,7 

li^did^a 
l5i;Kfl 
?57l,63 

sae7H7 

fl151.72 
^375.?? 

1*95. ?3 
4457.3 

3331. ?3 

BIO. 517 



3?S2 
1275 7 

23374 

2?eifl 
ZhOM 
4Hi3ft 
l41Sf 

443A0 
53108 
5^279 
^231B 
4 7521 
7334B 
77Tia 



L(hn&nu[it 


lATTTUEiE 
IT? 


GUUBa£ 


ib 


IB 


49 


117 


47 


1& 


112 


?0 


41 


iia 


73 


41 


ice 


?l 


it 


1D7 


^S 


i^ 


103 


72 


n 


1»Q 


J1 


31 


9A 


6? 


?7 


»2 


df 


?Q 


8? 


71 


[? 


7fl 


a3 


1C 


7t 


to 


U 


71 


5B 


ID 


il 


sa 


S 


SS 


14 



, ^ I^Ffl c T -*i T - BO fr7 4 - H I LE S-PER -HOUfl 

l]Oe[F UOfiK. FGICTLOfl DF 6 I HAS fftUSEII THE COUBSL 
OF THE TlFfl TO BEL^IflYE. l*iPfiCT CODSBirfPTES Aft£ 
NDU 1 4 p-4 3h rait rtAIiE IT' 



LKT 

1O0 

1!0 

1^ 

140 
150 
140 
170 

1B0 
1*0 
300 

:?io 

J30 
240 
21 B 
24 1> 
270 
290 
2*0 
,3DD 
310 



PRI1IT 

ffllHT 
PRINT 
IjflSUB 



Tfie < 3 1 1 ; " CLOSE EflC aUMTERg " 
TflBlJO); "CREATIVE Cflt1PUTIN5" 
TAB{(fl5;"flORfiEST[}tfNT HEli JERSET' 



110D 



PfllHTiPRlNTiPRlRT 



PfllHT 

fRItit 
FRINT 
PfllHT 
PHIHT 

PRINT 
PRINT 
PRIilT 
PKI*tT 
PRINT 
PRINT 
PRINT 
PtlHY 



-HEADING 



SITUATED flT C^DRDltfAFti <B^03 
FUfi ItlPACT AT Ittfll LOCATIUH." 



fl IfFO It' 



THE UF9 15 ON ft COURSE Df-T"IJEflR£E5 



■AT FLRBT THACkp 

'lOHBlIUIfE" 

'ftHB-i^-IlEGHEEB LATITHBE." 

■■ CALSD IT'S fAUINO AT fl $P£EII aF"X*HlLES/PEI HOJRr 

"TBU HAVE THE FOLLOWING AlTEHNATiyCS:' 

"flj roil CA« fiTTEttPT TO 5HBUT THE IFQ Qui OF TKE $KT. Dfi" 

-B5 rau CA*I DU HOTHIHAt flHH ^^^Pt THAT fllft FRICTlDn- 

UILL CftUaE THE COlRSf OF THE UFO TD BEVLATFr flWB THLJiJ' 

MIS5 TOUR lOCATiaR."tPR[ilT 
"UHAT IS rOilR fLAH Qf ACTLQtl (fl OP Br;:IHPOT M 



3?a 

330 
340 
330 
340 

3?0 

5B0 

3?0 

400 

^iO 
410 
450 

4A0 

^70 

430 

490 

500 

511] 

520 

530 

S*0 

550 

54 1> 

570 

5B0 

3?0 

400 

410 

^20 

£3? 

^40 

6S0 

4(0 

^70 

4 BO 

i90 

7011 

710 

720 

730 

7^1] 

7!Sl> 

7A0 

770 

780 

?n 

G10 
920 
330 
910 
S50 



fflT«T 

PRINT 
PfiINT 
PRTNT 



'OF THE UFO EKCEEBS"H"N,P.«., TBUB rt3SSILES AR£ DSELtSSL" 
■■--BCHNtfERB fRfBICT lOU HAUE-n^nlNUTES TU DE-STfiOT THE UFO" 
"BEFORE ET IS TOO IILQSE TO lrtPACT."lPRINT 



C-^I-V-H-INT^HNDCI^*^?*! 

PRINT ---JIDHPUTER INDICATES CDUR5F 

PRINT 

PfitUT 

FflltfT 

PRIJ^T 



AT 



FIRSr GIGHIlJfO IS ftPPRI?X.";C*f 



■TrPE IN H COURSE ON IHE CH4RT BEL0U":PRI«T 



T IME" p*SPEEIl\"L0N4 [ TUEE-'/LflTlTUIlE", 
FOB T<OTfl 5 STEP >9 
PIIIHT TJ,T,I,:INPUT li 
IF T=JNTCTh ANH T'H THEH 62^ 



■UJURSE" 



IF U 

PRINT 
PtIHT 



■H THE41 A?0 

"^l]fiRT--IttE 
"THI^ 5PEEII 
"THEREFOPEh 



TDEJ laHOT TOUR hT55ILE STRAIGHT 
FUEL LH ABOUT "F "HOURS r tr UILL 



FALL-; 



UttEfct" 



30ES THE H13S1LE- 
fBU-'RE lEFINlTELT 



RI15HT TQUfiBDS" 

It TR[IUGLEir;ljBTa 4^0 



3FEEU OF TKE h^FQ HflS EXeEEDfTi"ff^11.P.HH* 

IS T9 GR£AT FBR fOUfi DEFENSE liCREEN TD TRAOfI 

lOU ARE 1MJ* HA] IinanEff"":PRlHT:&OlQ /50 

IF ft=j; TMtK 720 

IF AMO THER 550 

PRINT "AT THAT CBUfrSt 

PRINT "[T RUNS OJT U^ 

pft[*IT " THPOlJIiH" 

PRSttT "TDllft FTQJlFnM^iMII BOBBlTEl M M !';GQTfl iiO 

IF A<2QI) BDTD 390 

FRINT "GaOIi UDRK' THERE 

PRI^fT "RirSSlAi^ii HOU 

If ft=C-] THEf* 470 

IF A-Ct1 THEN 7!0 

K-K* V* ] 209 1 1 = 1 - 1+5 i l^^l-l +1 :C*Z-T+a 

RENT T 

Pfijjtr ri . ATTEHTiorf— ^-- ^^' 

fRItiT ■tLflP5ED-TIHE-ltf0lCflTEB-THflr-"n"nINOr£5-HAVC-PASSED,-lF-™-' 

PRINT ^iiE R E - TO ■ H I T- TH E- UF n-**D V tH£-f OR CE - OF -THE- E SFLQS ION -UUULB 

p^ I H I .. „^ Bt 9 T EOr - ra U- ftS ■ UE LL-fcS- 1 HE -Uf U- ! ■' : PRIRT 

GUTG 750 

5 C&aniJI NATES/ 

SLIGHT DliVlATILlN 50 THE" 

-iPRlHT 



^EEtt 



FilTBT -TDU ARE 

PRIWT "RGNtVER 

PRINT -UFO HAS 

IjOTO 750 

PKIHl "VOU OOERSHOT 
fANTASTiC!'^ 
TDtJ riUST BE 



SHT OF TKE UFO"" 
THI3 IS ONLV A 
DtOTRDIEDi 



PRlfrT 
PFrlffT 
PRINT 
PRINT 

GO SUB 



rWE l*F0^3 
I rCU RIT 
L'ERT SHARP 



COaffDTNftTESp":flOTl] 
THE UfU E]<ACTLV G« 
■"iFRlBT 



PRQJEtieC CODRSE'* 



PFC!*IT 

IF LEFTHn*pn="B" THEN 7?0 

PRINT -LAUNCH JlN l.C.ff-tt. On A COURSE THfiT WILL INTPflCEPT TRE IJFQ* 

PHIHT "WriHOtJT THE UfO BELNB TGO Cl-QSE TO TOUfi LOCATiOH. IF THE ' 



G70 

B90 

BfO 

900 

91D 

^29 

^39 

940 

950 

940 

970 

9fl0 

f?0 

1S09 

1010 

1020 

1930 

1040 

1050 

1040 

1070 

1QS0 

li]?0 

1100 

1 ElO 

1120 

1130 

1340 

1130 

1U0 

1170 

ItSO 

11^0 

1200 

1^10 

ii:o 

Dt 



-TRT AGAJN";:IRPUT ^Uii LEFTiUI^ 1 ? = "N" THEK 1230 

1E09 

1070 

PR]ffT:PREHT:DDT[) 3^0 
PRIHT 
F-0 

A="INTCi:HD[lf*55+1tC"Z"Y+A 
M=12000 
Fir E ** B " ri I LEE " r ^'SP EE]J- ^ " LONO I TUI^E " , "LA F 1 T UBE"' * " COUR SE" 

P R I RT ■ " p ** ■ t ■ " > ' "* ' ■"" " 

f:iH+-1 

PRINT f1,X^VtZtJ: 

C^2-T 

I ■= X4 1 H T C flND1 1 ^ *5000 }+2000 ItS^n-i /40 

T=T-l*IT(R*j[K1 l*10^:Z='Z'INTieWm f*10] tt]"i-^-^A^2 

IF |t-P>57l]0 THEN F"F4l 

IF H>0 THEN B59 

PRINT 

.. ifiprt CT- AT-'' X ■■ - H I LES- PE R-HOtFft - — " " 

2 THEN ?aO 

■OBOB tfOfiK. FRICTia« BF"F"I HAB CA^fSED THE CDURSE-* 

-OF THE BFO TO [JEVlftrE. [«PflCT COaRCimTES ARE" 



SLSUIUOWEh'iPEIWT 



PRINT 
]f f< 

PRiMT 
PRINT 
PRINT "flGH i-f"H"9-F"S. TGO flASE IT'^rGOTG 1020 

PFINT " ^ -lfPI-HIfit-5EftyiC£ OH-L]NE-"fl"] "A*-5" 

PBINT "-"- Ki^£ JUST OESEHVEl UfLOSIBH ftT CODBHIHATES 

jl = tA-*2]*A 

PRINT "BLftSI SEEH FS0n-ft"3-hlLES AUftr. 

TF LEFTKJ1^1?--N" THEH 1220 

OOSUC 1190 

GQSUB 1074 

PRINTiFRlHTtBOlU 300 

IHfUT "PLflH CA OR B]-;D1 

IF lEFT^^PIp1^'"B" rUEtJ 7^0 

RET0R41 

l = I«T1RRBf1>+20^4-1rU^lNTtRNDn?*^OD]-+200:F=IHTLRt#B11}*5l-*1 

j:-INT[RflIH1h*500O]tZ00ltH-i:ta0O0:Q = I«T1RrtD^l5*5J-t1 

Z = INT[l!HIlil?*140J;IF KtOO THEN 11^0 

T^UTCJLNJJtl J*40):IF t<4& THEN 1t30 

IF ](>-3009 TRCH 1 1 40 

M = 5:5ElTa 1210 

If K>-i?Oe TttEil 11G0 

fin^zGOTO 1210 

IF X>M700 THEN 1200 

H=3:GBTD 1210 

RETURN 
EM|i 



"A4lO"s--" 
[-0-F",OS-- 
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Column 



tun 



iiamntt 
noitrietitiH, rtu JfnsEJ 



This program is a compuler version 
of an old card trick which never fails to 
gel some ooohs and aaahs from the 
unirlNaled. The deafer, or magician, 
takes twenty-one random cards, deals 
them out in three plies of seven cards 
each. You then tell him which column 
[or which pile) contains your card. He 
then picks up the three columns from 
nghttolett, putting the right pile on the 
top, and then deals the decl< out again 
horizontally In other words the top 
card of the right column now becomes 
the top card of the left column; the 
second card in the right column now 
becomes the first card in the middle 
column: the third card ol the right 
column becomes the first card in the 
third column, and soon. After he deals 
out all twenty-one cards in this way, 
you again tell him which column your 
card appears In. The magician then 
picks up the three piles in the same 
order and deals them out once again. 
Again you Jell him which column 
contains your card. He then deals the 
cards out one r>y one face up and 
ideniifies yours when he comes to it 
Don'l ask me how he does It' Maybe 
you can figure it out from the program, 
but It works every ttma. 

This program was originally written 
by Alan Barnes, 



TflTS PBOStflB WILI SHHL TBI A CflBU THICK. flFTCI THE FI»6T DEAL 

PICK t C B iTfE THE HUKBCFr OF Tht COCLMN CDHlAlHIIIO lU 

THE BfALEU Uf-i THEh PICK Iff m tftHS. A COLWirt *1 i^ TI«, 
AUB HILL BE« THEH OUT AE^III HlffliD^TfLLT, IrtE" ME fllUfiHES 
EilCH T]«, TYPE IHI HOHBEB at THE THE «« [laLSIHN tDMTfiSCflHO 
cm. TDLIOIITNG THt LAST SEAL THE OE*LEP Ull-L TUH^ eW" THE 



TOUH 



niifitat 04tt AT * Tintp 


UKTIL HE WflCMES THE 


f OF aun 


JACK DF srnDES 


6 Hf fLUlS 


UltS DF CLUBS 


4 HF HEllBTS 


3 Uf Hf«T5 


0IJEEN 1}F ^^AtES 


^ DF DlAHONHf 


ri^CF Elf niAHDN^^ 


ID DF SPADES 


klltB Df llAHflRIS 


6 DF Sfi^PES 


OUitlC Df ClUB^ 


OF CLJEE 


UUICH t^Dlun* CONTAIIfS VDUH CARH^ I 


d OF MEflfiTS 


2 OF CLUBS 


3 Df LE.1IB& 


7 DF Cc.li^^ 


TQ DF CLUfS 


f Df CLU^fl 


4 DF HEIiHTS 


fiUEEH CF aPAC^S 


KllA Of IlIA*ciJK»S 


ODEEN DF i:LUBS 


KIHQ DF Ct-UBS 


Z QF HEARTS 


1D OF 3Ffl»E£ 


^ UF SfAOES 


HHtCU CntlWH CAN TA IMS TDUR £MTit 1 


5 Of SPADES 


10 OF HEAItTH 


ACE Qf DIAtlDNlrB 


JftCK OF 5FliDES 


H OF Ct-WB 


6 DF HEARTS 


1& QF CLUBS 


4 Df KtAFlTS 


K1H0 or CLUSS 


]D OF 5FABE9 


7 OF CLUBS 


? OF CLUIS 


OUfEN DF CLJG3 


3 DF HEJLFtTJ 


UHICH CDLONN CDIfTAlHS TdDR CAffD* ^ 


S BF SFASE5 




ACE OF »liVlDriDS 




e I^F CLUBS 




]« DF CUIE^ 




HI#6 OF ELUfi^ 




? OF CLUBS 




a\^an. of cllj^s 




10 OF HEARTS 




JlitH DF 3PflDE5 




fi or HEftFITE 




4 DF HE*iff?5 




10 OF 5Pj^Ii£9 




^ Hf cmss 




3 Of HEilRtE 




^ QF CLUfS 




4 OF Dl^t4Dt1D£ 




J DF CLEIB^ 




KlifG DF DjAflUrtOS 




3 OF CLUfS 





i OF hEARTS 

2 DF CLUBS 
S OF SPADES 

3 OF CLDBS 
7 Of tLElBS 
10 QF HEi^pTS 
10 QF CLUBS 



J DF ;FADES 

ID QF HCARrS 

d QF CLUBS 
rtCE OF BlfllCrriDS 
JrtCI! QF SfADES 

4 Qf DlriUIOflUS 

a OF CI. DBS 



i II f CLUFB 

4 OF liiAHDnOS 

3 DF ClOBS 
II.IH6 OF^ HAMQ«Ii5 

2 DF CLU?5 
BKEK OF SPADES 

A OF ^PABES 



OOrSMI TQUPl CfrRB (5 TJit A W HEARTSh 
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LIST 

TOD PffitT 
FHINT 
PEINT 



110 
120 

13{i 
14C 
1?S 
1B0 
ITU 
2i}|} 
^IP 
2?(i 
?JP 
2^{i 
25C 
?'C 
290 

3QD 
31P 
J2fl 
J3il 
J40 
350 
J40 
3?0 
ZBl} 
390 



TABCIO?;*CREATIiJ( 



eunpurcNij- 



iftBtiffj^-^nDRfngrauHj m£« j£RBiy" 



PRIHT:PFr3Hr:PRINT 



PlTlUT 
fRlkl 

PfilNl 
fRINT 
PRINT 



■THIS PfiflOffflH 
'P[CK A CAlfD I 
'THE DEALER U]LL 



Tfl 21 

rt*I]-lM*aHI[A(ZJ^^U THEN ^m 

THEN 410 



41fl 
^20 
■13(1 
440 
450 
4^0 
4?0 
4BD 
*91> 
50D 
51« 
A!D 
930 
5^0 
5 JO 
5dD 
3?0 
SSd 
3¥0 
4 CO 
430 
420 
A30 
4^D 
650 
4^0 
6^l> 

A^i^ 

7J0 
720 
?30 
7^1) 
?5U 
7Jfl 

7ac 

/?0 
?00 
G10 
020 

aiQ 

81 D 
S41I 
87(1 






B?0 
*i>0 
?fO 
920 
VJU 

¥5D 

?70 

?ffO 
?T0 
1Q00 
IPIO 

HI 



UILL 9H0U T[fU A tflFD TPICII. flfTfilr THE FIRST [IJrtL" 
NH TrPE THE NIHEEE Qf TWE CflLUHU I^ONr4lit]NG H*" 
Pics: Uf THE CflRftS, fi CHLLIttN AT ri TIHf.-' 
AJfB UILL BEAL m^pj Ol^T AG^^Ir^ MORIZDNTAH,Jh UHEtf «£ FT*fl9«ES- 
EflDH TIME^ TTPE THE ilU^BEf! Of THf THE NEU CQUJiHIf CDtfTftlNINlj TDUR" 
CflRD. TOLLDIirNB THF LAST DEftL THE MfltfP UIEL TlfRM QWEP THE" 
mOSp DN£ rtT J^ TlfJEp UNTIl HE iTEHeifES THE 0N£ TOEf PICMEB - 
rRIHT:Piimi-PRINT 
iln A{21^BCZIF 
fDR J: = 1 ro 21 
J=0 

T"E*ITt52t(flN&£llJ) 
FOR r^l TO K-T 
IF fii"r)"T THEN 210 
NCKT t 

Atj;)>T 
«Ei:T If 

FOR I^l 

FUR Z=1 

Tf 

IF 

IF AtZ3-3-4*atfHfiCZ?/4)J 

Cl = "SPA[tFf- 

&0TO 4?{i 
C*="H£ftfTS" 

ni=- 

GJITQ 1?0 
CI^'^CLUBS" 

50 TU 4?fl 
C* = -|HflN[IH- 

H=*|f1 

IF ri ;> 4 THEN 53^5 

fHltfT 

IF MI) 

P5INT Tf 

IF J=5 TH£N POfl 

IF J"IO TJIEH 9flO 

DOTO ?1iJ 

IF INTCAIZ}/^^-? THEH i70 

IF ItfTrfilZJ/4^=10 THEN 650 

U IHTlA<f]/4^=1t THEfl i30 

I^OIO 630 
Al=-flUEfH" 
liOlO 6B0 

fil="fli:E" 

pRIifT TABfcrf-!}*i3);ft*;- OF -;i:*!W; 

IF J=J THEIf POi- 

IF J=10 THEN ^Sfl 

HEH Z 

PfilNTiPRIBT 

PRINT "4JH[CH COLUHil CONTAJHg iOOP CflRB" 

[NPyT K 

IF K<1 IIR K > 3 TIIEH FJ!I*tI:PRlNT *'tl-3l-l[>are 

PR]»fTiPR[ilT 

T = F 

aift + ?-3*INTC<K-*1?/3J 

GOStJB !40 

QQ9UR f^C 
S=:*:*1-J*I«T(K/35 
ODSUS ?qo 
FDR CH TO 21 

HEXT e; 

»tEir I 

J ^5 

FOR Z=1 TO 

FtlNTiilEJiT 

PRINT "Oflpg 

Nil 

Jii10:Z=1S:G0T0 350 

fOP R^S TO ^+Sa 3TEP J 

£[Th=ftCR) 

N£KT fJfRETLJRH 
Pfi[NT ".":Pn:*IT 

PRINT -BO tOU UAJII TO SEE IT flBftIlf-*:IMPUI 
If T*="TES" THE*I Pdl^TiPRINTsfiOTD 2J0 



7J0 



II-HHTnOifiNEFH ?4i];p(nO:CaT[) 
7!^R[HT 

TJIUP CflJfJJ 15 THE-; 



350 



.■.■■■■:i^'i-i::-:rir} 
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Concentration 



This childran's card game for any 

number of players is also called 
merriory, or pelmanJ&m- It is easy to 
play and is an excellent lest of memory 
a nd bse rvall on . Ttie com pu te r vers i on 
here simjlates the actual game except 
that it only allows one player to playJn 
the actual game^ one player shuffles a 
fleck of playing cards and lays them 
face down on a tabJe in ell direclions 
and so ^hat no canJ is touching 
another Each player tries to collect as 
many cards as possible by lurning up 
pairs with the same rank per a number 
or picture- The first player to go turns 
over two cards at random and allows 
Ihe other players to see them. If the 
rank of the two cards is the same, for 
example, two aces or two kingSn he 
takes them and may turn over I wo more 
cards. He continues in this way until he 
lurns over two cards that do not match. 
These cards are then placed back 
down in their original positions, face 
down, and his turn ihen ends. The play 
Ihen passes to the ne>:t player This 
player turns up one card^ I' it matches 
one that has already been turned over, 
he must try to remember where that 
card Is- Jf he is successful^ he takes the 
pair He continues his lurn until he fails 
to turn over a matching pair. Play 
continues in turn until all the cards 
have been collected- The winner ts the 
player with the most cards attheend of 
the game. 

In This computer version oJ the game. 
the cards are numbered on their face 
down siflefromonetofifty-fwo-Asyou 
turn over two cards, their rank is typed 
on the terminal- If they do not match, 
their rank fs oblileraled by successive 
lype-overs with Other characters. This 
isanatogouslo thesituahon of placing 
the cards back down on the table face 
down- Also In the computer version of 
The gamethereisonly one player trying 
lo get all fifty-two cards in as few moves 

as possible. 

This game is good fun on a CRT 
fermlnat- Also, why not Try modifying it 
to allow play by two or more players? 
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FFRSl CAFTpT ] 

III tllllllHIIIItlllilllllllll 



I llltll [Itll J III IllllUIllTlll 



FIRBT CftllTJT 53 

THEff^ ARi OilLT 12 CMlS U THE DECn , nQT 53 

FIRST Ci^HP^ 41 

3ECBNII CjW^D? 37 



3 ECO KB DftPD"' Id 



VII ant I iitiiiii riiiiiifttkiii 



9D 
hri^iJE Hli£i 






i ?ICi:S. 



7 flChli. 



FlfiST Cliflli-^ ^1 
S£CD*lff CARP' 2? 

'i\iW SCARF iz hav 1 tm 
FIRST CARDT 1 
SfCQKH CAflB-7 4^ 
UAV% ft <MTCh "2£ 

1'DUK scDRE [s MJ?u ? rm 

F[R^t tfiPD"* >] 

VOU HflVE ftLREfilif ttATCHEB THAI CARD, 

FiRST JTASE-* « 

SECDriD CftRB? -19a 

TJIERE ftRE OKLV 52 CriRK I*^ THE CtCIL NIJT 4?e 

5ECPMD Ci^F^Ii' 4e 

I If II til III il I II III tllCl VVl III 



FIRST CARD? Zj^ 

i ill Ell III II III 1 1 J I II 11111 III I 
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.IKT 



■Ca^CEttHPTIOt*" 
-:;RiiiTiVE CUflPUfirtQ 



^[1 

5C 
2:^ 

:;?& 

25{i 

^^ 

lU 
3?D 

3^0 
J72 
374 

4]0 
Jll* 

44D 
450 
440 
170 

4eir 

4?U 
^10 



PRINT TftBC^S)? 
p^[Nr Tnansj; 
I^RIIIT 

PRItfT 

p[ri CtC^Z] 
FDfti j;^^ Ta Z2 
JTEftB E4 

NE.XT y. 

ftEn ~ SHUFFLE WtB M«- 

FDi: i=l TO 51 

HE^T Z 

GEM " STARE ELi PLflf 

FDEL il=1 10 2b 

ntni ^F[I19T CftRD"; 

litfl^T U 

IF U > AHD U ^ 3!^ THtN 

PRIWT -TM£F[E Ate MLT 32 

ttOTO 3iD 

LET G=1 

]r CJtU]-" ■■ THEft fl40 



nonusTouii n^ jekset' 



CARD& 



IN rut BFCKt hot ';il 



Xtf THE BECK, RJl T ";U 



PR3^T "SlLJhD CfiRD"; 

ihfjt u 

If u ^ fluo u < s:f THtN 4:^0 

PKIHT "fh£RE AAE DIHT 52 CrtilB^ 

QlfTa 4U0 

LET G=£ 

IF C»ill>-" ■ -HEM e*U 

IF U t:^ EJ T&lEN 4?i> 

PSINT "TOJI fi-fl«M fIi;K THt iifltlE CflftD TlllCEl" 

QDTO 4iJ0 

PRIST -fl-iuj-is -;cifUp"i";fcfris ^*ci^Uf, 
Fon i=s la 51) 

PSINT; 
NtU 3 



^20 

570 

iOO 

d10 

671? 



PRIHI 

fftTrtT 
PRINT 

PRRT 

ODTD 
PRINT 



DllRi(lJ5;"HnH»iHHKHhHiihl--riHrJMrtHHMe.HKHMMHHll , 

CHRItlUJ^IIlIlUllIIllllIiJMinni-I^^"; 
c HE K 1 3 > ; ni » xui o u i mt XXXXXIilX^iXX J ^ 



30 

"THftT^S ft i*ATCtt -^LlCDhpCtCU] 

Ltr c*{U)=" ' 

LET HCtlJ"" - 

LET S^att 

PRINT "YQUR HCBfiE IS HQU^rE!' IDt; HflL-^f HflU ^nj-PlCitS-- 

Nfit! N 

KEn -- THE REJUITS 

LEI ei"g/(tt/4j 

niui "iJ*] aCJfiEr-S;- OUT of ";h;"THftT i5 ": 
Dil BI^I.Q ljQT3 ^fiOt^ft4^72Dp7A0 
PflJItT ^POOfi." 



6fO 
?D0 

71U 
?20 
790 
740 
75 1> 
7d9 
7^& 
7B0 
7¥0 

soo 

370 
873 
8Q0 

a35 
a?5 

900 
905 

910 
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TQU UANT IB fLAI AQAlit"; 



GDIQ 770 

PRINT -FA IS-" 
GOTO 7?IJ 

nlti^ "EQQiF." 

SDTO 770 

PHI NT "EICELLEHT 

SaTQ 77 & 

PBIHT -. - , riAftH 

peiMT 

FSlttT 

iNPUl 

iF i1 = *TEa- THErt 240 

PRINT 

PhlMT 'I^OHE BALiK ABAIflir' 

Eftii 

PRINT "fOU HflLt: flLREALT mTCHED TtlAT CARli/' 

IF £ = 1 THElJ ifiO 

GOTO 400 

■fL5" ,-7S" p "33" , ■■43%'^SS%-ia% VB" ,"ftS" , "95% lOB- , 

"flK"p"Z«-/"iJiS"4rt 

-A0-T'2B-p-lB-,^'4B"p"SD%"in%"7 

-RO" 

"*C"p"aC\"3C 

"KG" 



IiflTfl 
HATfl 

II^T^ 
[^ATft 
^ATPi 
HATlL 
|i4TA 
DllTA 
£NJ^ 



F 



-SH"T'*H%'^7H%"Hn'S"9H-^"]0H' 



30=^ 'TB"**TD[P'% 



■4C',"5t%-4[:%"i'C"p"BC\"»C"p"lffl;'H 



"JH%"flii 

"ji;"p"oe 




Ctondot 



This is the old childtiood favorite of 
"connect the dofs," The objective Is to 
carve out squares of "real esTate" with 
I he computer as an able adversary. The 
player who connects the two dots 
which complete a square gets 
ownership of that square. In addition, 
the player gets ^he added bonus of 
moving once more. This can be quite 
aqvantageous in certain situations. A 
nine-square grid Is provided as a 
playing board. 

A sample of the grid follows with an 
identifrcation ot each coord mate where 
a line may be drawn. 



(1-3) (lr4) (1,6) 

{2.1) (£p3) (3,5> [2,7) 

(3,21 (3.4) f3,6) 

<4,1) {4.3) (4,5) (4.7) 

{S,2) (MJ (5,6) 

(6.1) {e,3) (6,5) {6,7) 

(7,2) (7,4) (7,6) 



Vou'il find It fnteresting to note that 
The computer mirrors the player's move 
in so far as possible. Vou may also find 
that the game mows rather slowly, 
especially tor the first three or four 
moves. 6epatient1 Once squares begin 
to fall, the game moves swiftly to jts 
conclusion. 

There are some modifications that 
you may wish to consider if you are 
going to adopt this program for regular 
use. In addition to improving the REM 
statements in the program, I would 
suggest: 

1 Modifying the program so that the 
grid is printed after boSh players 
have moved [rather than each lirne a 
mo^^ is made}; 

2. Modifying the program so that once 
a player had ownership of a majority 
of the squares, the game would end 
rather than proceed to t\s inevitable 
conclusion; and 

3. Modify the program so that the 
player's inftials appear in each 
square he captures. 

The program is by Chuck Lund; the 
writeup by Pete Ollvieri. It originally 
appeared in Cr&ativ^ Computing, 
Jan/Feb 1976. 
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CREMIVE CDrtPUIJHO 



mis ^itOQtAn uiu flat tatmict ihe sqis uim tou. 

THE fi4H( 1^ PLBTED □« fi 4 E 4 H(SI,1 . UHEN 

ion tl4NT TO lAKE fl FlO't ICU MUST TlfC IH 

IhE CDDRDIriATES OT Wi SP'CE EcTuEEb TkE UV SOES TO J 

utn: TO :DifPiECT. Evifir Eacn of rauit irnvES bt ttpiiie 

ThE IIDW NUrtBtH, * CDKHA tut THE COLtlJH HlmBEll, 
IHE ItPPEir LEF' MfiHB CDEKEB Df IHE ARRil) IS 1,1. 
HEfTE IfE (0- 



Ai noi/E 



ms POWEI 1,1 
>QU tE*UI BDH 
YDUll BOVET 1,7 



rts rmvi 



'TDJr lOtfET ?,i 
ya\l ItEklLLT If Oh 
TDUr BOVE* 7,* 



m nvvl 



moit nBv'E' 1, 



'I BflHI IB PUT A LINE THEPE' 



TQUH flflVE' ^ 

t 



nr tioi^E 



T ilillfT TO PUT fi LINE Tll£R£-IM 



t 
HT hOvE 



rOUR HOlr 



PIT HDVE 
L 
I 



^ ^P' 



* 2*. 



rutih: flUi^E^ 4pJ 



J r 



MT HDVC 



? 2 J 



vjrjR Hover J, 4 



Nr JfElVE 
r 



HT HtlVl 



: £ 



_ \ 



t ; C - 



J-IST 



1 
3 
3 

5 

5 

? 

IP 

11 

12 

31} 

^B 

6i 



TftSf2DJ--titEflT"IVE COPIFUTINfi* 
IflBnfi?;"|5flfiRISTDl^j NEU JEflSEflFRIilT 



iOU." 



"■HIS PfrDGftAJi DILL PUr CQilNECT Jif£ EiflTS UITK 
■■TH£ GAHt IS ?lA'fl» DN A 4 X ^ rtRRjiT. UHEi!^ 
■TBtl UftNT TO JIAKE fl ttOVE rQL flUST TlPf IN" 
■THE Cfl5([HtfATE5 Of Iflf SPACE BETUE£H THt TUO HOTS TUEP" 
■tfftHT TO CDIfNECT, fNTEK Ej^CM Of VDuR HQVES BT TIPIM" 
"T^E RflU ttUflJEftr ft CflttPlfl AffC T*|E COLEIMN JfUrtBER." 



"T*IE l^PPEft UFT 
"HERE Ul Gff." 
IZh123 



VD 

1(14 

lICi 

120 

130 

20O 

5li} 

220 

2 JO 

240 

jao 

243 
270 

77? 
2aD 

310 

:i20 

IJO 



PPiarr 

PPINT 

fRiNr 

FRIi#T 
PHI*IT 
PRINT 
PRINT 
PRINT 
Pftl«l 
PRiirr 

PRINT 
PRINT 
au AC 

FDR R=1 TO 12 

FOR Pal TD 12 

IF R/: = INT-(fi/2J TEJEN Tflfl 

fP C/Z = INJ(C^:]J THEft 1011 

GD^f] 110 

JiCR,C}-0 

NEXT C 

NFIT R 

If ^=1 THEN 2^1 
[>Cl£UB lOGD 
fRH*T 'TDiiP J^ayE"'^ 

lifpur Kp-r 



HAHff CDRKE*! OP THE MKA1 IS 1 



I ' 



TBEti 2*0 

PtINT "tEUt ItEflUr iFOri UflNT TO PUT rt LINE THER£ih 
BOTO :]0 

IF fa:-l)*(X'7J > THfJf ?40 

K=X + ? 

IF fT-t)*!!--?) > rwEtf 240 

IF uttfi)/? t^ iHrcestf+n/z] t^cn 2« 

[F A^KpT) <> e TR£N 2lD 
IF :(/2 =intcj:.'2? the« joo 

If ftCI-2tr]f^[K-l,t41J+A(X-tpt^-)p O 1515 FHEW J5^ 



3*l> j1CX-1tT) = 1 

m IF AtJ^^2HTj*jicj:i-i,[*ntflati,r-i] o ijo then 440 

37V QOTO :i>o 

390 TF ACXpr-aj+A(K*lpVll*AfX-l,r-ll 150 THE* 410 
3f0 ftCX,T-ll=1 

410 If flcx,Tf2}tA(>:fi,r^i]4Aa-Tp^*i? <> i!0 then 440 

420 AfXpVflJit 

430 GOTO 20i> 

411} IF Pil THEN 20* 

4^t 0l}34^B HI50 

^^<| PHlNt "PIT HOVE- 

^70 FOR R=4 TU 10 STEP 2 

4SV POfl C-4 TO 10 STEP 2 

4?5 IF ACR-1pCUfl(R*1,Cf4^fPt,r-Mfrttff,i;^1] O 130 TKEH 100 

510 ]F flCfi-lpC} O 1} TrtE*f 550 

520 A(J^-1p£?>J0 

530 If fl<R-3pni-flCfr-2pC-1)WJ*-2,E:+l} O 15<^ r^EN 450 

S^D LET ArR-2pi:j=-1 

551] JF ACJlt]^C: O D JHtN 5?0 

^40 A1R^lpC]-30 

57ij Ef Ai.^ + 3pL?tAiR-*2 C-lftA<Rt2.Cfl) <> 150 theJ* J30 

5Jl> ll^fi+■2^CJ■=-r 

5^0 if flCfpC-lf Q THtH i3D 

^00 AiRpC-1 ?::5fl 

ilO CP AiRpC-JJ+AiR-l,C-J»*ACR*1pCfaf O IHO Tffill 490 

ijfl IF flCfl,Ct-1J O THEN ^50 
i40 ft(FE,Ctt3=50 



t H ] if : 

* ■ ■ ■ * 

: C : : 

T ■ ~ + 

X ] 

roup HOVE? dpj 

I S H ± H j 

h ~ ■ - ■ 

1 I C : I 

■ ' ► ^ 



HDVE 
C t H : H ^ 
: E i ± 

* F 

HDVE 
C F H ^ N r 

■ ■ X 

C : 



= C : M [ ff i 

* C = C i C I 
: C : f 

HT novt 

= C i R I H t 

* ^ - - - " - 
= C I C I C i 

I UON 



J50 

AGO 
d?0 
d?2 
?n 
710 

j[: 

?Zi) 

7Jl> 
7ifl 
750 

/to 
soc 

310 
B2l} 
S.31] 
340 

sn 



IF 

IF 
LF 



fii2 

390 
RBI 

0^3 
tJB5 



9l>D 

?H> 

?!0 

9J0 

9^D 

■^Si} 

ViO 

100i> 

li^rp 

10ZO 

rt"30 
msi} 

1Q£0 
1D70 
10B0 
}(?0 
1I0D 
IMO 
USD 
1130 
IHO 

ir50 
n70 
TIBO 
11^0 
UOP 
IZIfr 
1220 
1210 

t^qo 

TZ45 
1W0 
12A0 
12.^0 
120 J 
IZ9& 
130P 
1310 
IJ20 
140l> 



!!.^^x;f'^^'^^^"^''^*^^**'"^^'^+'' <> 130 THEH 450 
RCN^Ct2J --1 

BDTO 450 

■Nfn t 

^F E > I THEN 7J0 

IF *n2-jpi?^rK>ft mn 730 
fl{r2-X,]^fj^50 
If E > p THEN 970 
GOTO 20D 

fDK fi=i TO ? 
FOR C=3 TO 9 
TP ^fi*P]/2:^INTt1ff+C^/2h TJfEH 350 

^fRpCJ O tl THEH 850 

R/: = IHI[ft/Z> irif^ SI30 

flCfi-2^CltflCR-1,C-fJ+Aift-f^C*15 p, jQQ THEJI 350 

-^^R + 2,C?tflrRt|,C-lj^ftCR*1^Ctn =100 THEN aSO 
■^CflpCh^tO 
GDIO 2150 

IF *c^e'2ji-rifff-i,c-ntrtifl4i,c-iP^ioo tjj&jp sso 

If fl(R,C^2]ffi(R-t,Cf2?*AiJrt],C + ]> <} 100 ]H£fl OEO 

iPEXT jr 

JF £ > 1 rjjEW 7&0 

R*INT(flH[K1?*75ti 

C"lNTCfiNIiM?i7?+3 

If R/2=INT^R/2J iHeN 895 

IF t/2^IHI[C^2h THEI# 900 

fOTO 870 

IF €/i O IrtT(C/:i THEIf fOO 

GOro B70 

IF ft^ffpCM^ U THEIf 070 

AtR^C}=5l5 

8OT0 Zi>0 

PRINT "BQ ^OU UAMT TO PUT AGAIN CliPE 1 FOR T£S BR ? FOR ilD)" 

lN^UT Ii 

IF & ■ 1 THEff qu 

CND 

P=<| 

11 = 

6 = 

FQl^ 

FDf: 



TO f 

TO ? 



C = J 

IF A((,CJ O Q tHEN rOfiC^ 

P*!IHT " "; 

GOTO F240 

TF A^R^CJ (T -50 THFN M10 

PRINI ■ . *; 

8DTD 1240 

]F ACRpEh O -1 THEH 1l40 

PJLfHT ■■ C "; 

BOTO 1170 

IF ftCfi.C? O i tH^H 12D0 

fRI«T * H ■■; 

I" = Ei*iHRpj:j 

E-i:*1 

IjOTD L240 

IF R/2 * IHTfR/5} THEM 153P 

fftlJir ■■ - ■■- 

eOTO 124D 

PRINT " t "^ 

iTEtT £ 

PftlHT 

NEXT fi 

IF t >*9 TICII 1280 

JtEtUtfM 

IF t > FHEf TJIO 
P*|J!T *I UQN" 
G078 9]a 

PfiEMT "TfRJ UOItni" 
GQTQ ?3l5 
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Comroy 



C»E*TI« COBPUTINQt ftOfiftlSTQUN, NEU JERBtT 

1HIS HAVAL UAR OmtE IS rLMEB OH A >C BT 10 mTRII 

^mf ME Tut Mli TNC CDnfJTCP IS A CARGO SKIP ANIT ITS TUO 

DtSTirOT£l'»^ TNE ^ftlP START! lit SOllAltE Itfl AirD ItAffBDHL'T MOVES 

Ti» SaUAfCE 1^ HOLiIHG 0p1,3,Djr ] SOUAHES AT A TJNE^ 

QK DF TMC SHIP'S SeSTftDVERS SIAITfS M SOUAftE ^9 AHft AfiiJES 

RMDaNLT {i,l,Z DH J SflUAlTtS AT A T\H SEARCIHEK FBH IK SUl. 

Tff£ DTHCR BESIfrOTER STAfS lilTHIil ONE SOUARE OF THE $riIP AS 

At ESCOflT. m SJS ElAFTE IN gllUAIlf I2p CA«l IW^it UPplrOUK, 

LEfT 9R RJfilfT 1 SirUARE AT A TIAE^ 2 HDvES PER TUfW^ANI^ IT 

HAS TQBPEIH3E5 ITHlEH 11 CAH flfiE 1 AT A TIflE In A«T STRATOHT^ 

LINE* ATTFR E.ACH Sllf ll[^VE^ THE P£ff]9CEffE UILL SEARCH 

EACIf AUJAiifHT $QUllGE fW Tri£ SHIP. U-SO ftAHDQh flEtOJIHAlSAHCE 

nEPORTS UTU IE AftDE. THE SEQUENCE 9F nAT ISx 

I SHIP AND I^ESTJ^OYERS ADVE 

3 ton HOVE -f 

3 fbU tAN FERE A TDRPEVQ 

4 PERLS COPE SEARCH 
a tOUR MOVE AGAIH 

AND JACK TO 1 

THC SUB HIHS If IT SVCfEEDS IN HTTTmO IHE Sl^tP OlTtilN * 
TORPEDQES UITHBUT ADVINl^ TO A SfftlARE QCCUPIEir ST A SESIfEQTEB* 

rO 'FTJTF'' lkir&LE»!lia,L.«»UttTLlltl-ltTi!<'T>lX."D' 

- 1 -=lEf I , ' B- ■ B tOH T , "U' 'UP , ' Ji ■ ^PBU", 'I U ' -Itf " UP j 'IflJ ' "fi lOKl 



This is a naval war game played on a 
10 by 10 grid. You are a submarine and 
Ihe computer plays the role of the 
convoy conslstrng of a cargo ship and 
two destroyers. One destroyer acts as 
the escort traveling alongside the 
cargo ship, while the other searches for 
the submarine and tries to destroy if. 
The destroyer which is searching iot 
the submarine moves from zero to 
three squares alatime, searching. The 
other destroyer stays with in one 
square of the ship. The submarine 
starts in square W12 and can move up, 
down, left, or right one square at a lime 
with two moves per turn. II has four 
torpedoes which may be fired one a1 a 
time in any straight direction, horizon- 
lahy, vertrcally, or diagonaUy. 

The game ends when either the 
submarine destroys the cargo ship or 
when one ot the two destroyers gets 
the submarine. 
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LIST 



SUB IS nQU AT 12 

DESTtl^TER LAST SlGHTtB AT 7a 

SUJ'^ HOVET 13 

SUS^S t1DU£^ 14 

SU» AT t4 

SilEP LAST SEEN AT 104 

FltE' NO 

JJP PERISCOPE 
3R|f HOI IN SIflHT 

REDDH. SHDUS ^IP AT ft 

3JB ES NOV AT 14 

DESTRDTES LAST SIBKFEii AT ?S 
SVB'S HOVE* 15 
SUB^S NavE"> 14 
DESIJ^OtER ^tAS tlUVE^ 

SUb IS hDU AT 14 
DESIAmR iAST SIGHTED A? 7H 
SOB'S HOWE* T7 
SUB'S HO-JE^ II 

SEJl AT tfi 

SKTP LAST SEEN AT 79 
FIRE^ MU 

UP PERISCOPE 
SNIP HOI IPI S19HT 

RlC^:i. SHDU"^ EHTP AT SB 



SiJI ]9 NOV AT It 

DESTKEITEE LAST SIOHTO AT /a 

suf s ttovE^ ;e 

gUB^S ^iOLfE^ 3S 

D^TPWT^R tiA& HBVEB 
SHIP t10V£B 



SOB IS HOU AT 
DESTfTDtER lAST 
SOB'S HOUET 4S 
SLIS S ROVET as 



30 
9IOHTG0 



AT 7S 



Sm AT ^1 

SHIP LA5T 
FLEE^ NO 



SEEri ftT 
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PElNT-RANflOMlT ^,\^? OR 3 SQUARES AT A HUE BEflftCHINO FOR THE Sbl," 
PRlHT"T*fE OTHER FESTfOtEft STArS IflTHlH ONE SOllARE OF THE SKIP AS" 
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Corral 



CORRAL is a gam© program inspired 
by Harry (short for Aragon}, a horse 
acquired jn a tash momeni of in- 
dulgence for a leen-age daughter 
Harry, In his own Inimitable style, 
taught us much about the care, deeding 
and psychology of the equine species. 
Some of that hard-won psychology has 
found its way into CORRAL, which isa 

ne-d i mensio nal s i m u latl on of the two- 
(and almost three-) dimensional 
problem of catching Harry for anything 
other than food. The mam reason for 
confining Harry's alter ego in the 
computer to only one dimension is 
simply to con serve paper on hard-copy 
terminals. Even so, the presentation is 
very effective on a video display unit. 

The corral itself is bounded by a pair 
of siderails represented by upper-case 

1 characters separated by 21 spaces. 
The cowboy C always enters beside the 
leltmost rail while the horse H is 
happify mooching somewhere 
between positions 10 and 18 with a bias 
towards the right. This bias and the 
various other behavioral peculiarities 
o' the horse are governed by two data 
matrices (statements 90 and 100) 
which may be altered to vary the 
beast's temperament from wild to 
docile depending on the data distribu- 
tion. 

If the horse bolls, a check is made 
(lire 45Q) to ensure that it does rot 
reach a position less than one spaCe 
away from ihe cowboy. Occasionally, 
the horse bolts to a position more 
advantageous to the cowboy, just as in 
real life, but usually the opposite is 
true, particularly wheri it bolts as a 
result of an ircauUous approach by the 
cowboy So heed with care the advice 
Tor the cowboy not to advance by mors 
thar half the separalior in any one 
move except when adjacent to the 
horse, of course! 

The probability that the horse may 
kick when the cov/boy moves close is 
set by the IF statement at line 500. The 
cowboy is immobilized for from one to 
five moves, •mhWe the horse carters 
happily away from the scene of his 
triumph. If this happens more than a 
certain (random) number of times the 
round-up is terminated by Ihe depar- 
ture of the cowboy In an ambulance. 



Occasionaify the horse decides to 
engage in a friendly dance around the 
cowboy, but remember thai random 
number generators have no soul and 
Ihe result is often vHe treachery as the 
horse delivers a fatal kick at the very 
moment when a successful catch 
seems assured. On the other hand, the 
skill of ar accomplished CORRAL 
cowboy car result in a catch withm 
three moves with no injuries sustained. 
¥ou either have it or you have not, as 
the sa/Jng goes, in the latter case Ihe 



program allows a mahimum of 100 
moves before relegating the luckless 
cowboy lo cookhouse chores. 

Computer freaks with multi-color 
graphics will no doubt be dissatisfied 
with such prosaic symbols as H and C 
for the horse and cowboy. A fully 
animated CORRAL in livmg color (with 
sound effects by a music or speech 
synthesner— a talking horse yet!) 
should not be too difficult to achieve. 

Program and description are by 
Colin Keay. 
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i:> 1 1 L ^ I : F(=a : ll<1> I ||>:CI: G050B 9Ml 
IF R>5 THEIf 0*-B 
H>l3t||;GaSUB 910 

Tojpjpum 
I). - 

FOlf J=1 TO 2l:4IJ)=3?:r^i:T J 

l^'Ctai?:iS(||)=72 

fIflHT H,-]-J 

FOP J.I TO 2T:PRIJfT Crtlttlfl(J)) JiBEIT J 

PJHWT -I'pBtJ 

j-AiatH-cta.aomh-c) 

>f-P»]L]F V>0 GOID ^40 
IF Jf>1C0 T4EH fSO 
IJIPOT I 

IF ll>tl fldTi D<£ GDTB 450 

PHfUr -lltEOIH. HQUt, Ifit AGAIH-,;i60TI| 390 

F-CH"DIIF E <| Olt E>2I IHEH 420 

i:=E:^DgirV l^<JD 

li-Pibl=M-L*iijBBSIJB am 

IF J!(?-D MB B >\ BDTO 570 

IF HM Affl H(20 THEN ACO 

9QBUB BOO 

IF R>2 OOTQ 400 

IF (>7 6010 300 

G°9l2«PiH'H-L»6iL-LsflOSIIB fill 

EF ABEIh C)>1 THE* 5?5 

H->i-3>L:esEU£ eio 

B1>'B0LIFB -iflQia 310 

]F ftBSftf-CJ>2 0IT9 3C0 

&Q5UII B{lO 

IF fl>J BDTO 7C0 



S9 
5J 
dO 
7C 

KC 
1IB 
I2f 
130 
KO 
150 
140 
l» 
1»0 
200 
2Z0 
2?5 
S30 
300 

3ri> 

370 
330 
333 
337 
370 
300 
390 

3sa 

420 
430 

4411 
510 
930 
340 
54J 
1» 
5H 
570 

ago 

5BJ 

a?? 
dan 

AO^ 
ilO 
AI5 
A20 
AID 
A 10 
650 
&70 
7*( 
70S 



810 
B20 
BJO 
900 
STO 
930 
940 
943 
947 
9)0 
940 
970 
975 



Ok 



H- F* J : *l=ftt I : Hrtt- 1"L ! GQSI]» 8 tO 
Bt=-l[IC>iEB-iBOrB 310 

IF H>T eom too 
i;"»;-i:p(iiir:ifflsjH boo 

H=h*L«LP*l>:60SIJB BlOlODrQ 309 
tF ll=C THEII 93» 

9010 dOO 

R- IHT { 1 0-tolO ( I ) ) : P-3 n , in :a=S 1 2. H M IfE TUim 

IF ri<l TMEN H-1 

IF Vim IHEN lli?l 

PPINTiPJUHT 'THOSE KICKS LAPIBEI VQU IN THE HGSPIT*li" 
PHUT ■ QET UEI.I aCOHFI-SflaTB 940 
FEB J. I TO 2|:A<J|±3J:flElI Ji*HCJ<15 

pifiHT ,-i-r 

FBI? J=f TB 21[PlfIIIT Cl|IHifl(JJJ::flfjlT J 
f9iHf -I- 

PIIHTiPITIIir -riFPEEII mt see IF ^QUCAH CATCH JiJM l» fEBEB fflUES' 
TBPIJT -AHOTHE? PDUHDUP'lFI 

If I.EFTIfFt,t)^-r THEII ?00 
GOTO J99 

PRIIIIiPPIBT -EHOUBBit fOuO DO HTTCR AS TflllP CODKi 
ERD 



'iGOIO 940 
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Countdown 



The program Countdown is based on 
I he program Guess in which the 
computer chooses a random number 
and ^hen gives you clues whether you 
are too high or too low unni you finally 
get Ihe number, fn Countdown, the 
program adds a filtle interest to this 
guessing game by giving you a certain 
number of tnes to get Ihe mystery 
number between one and ten before 
your school building explodes Using a 
good guessing strategy should allow 
you to get any number in four or fewer 
tries. If you take more than four tries^ 
the bulfding goes ''boom." To add a 
little more Interest to Ihe game, you 
may want to make the maximum 
number ot tries three. To do this 
change the value of T in statement 45 
from 4 to 3- 

Countdown was written by Mark 
Chambers. 



h:uN 



- i:tUNI [HJLJN 
CR£A11VE CDMI^yriNQ 



^flU HJiyE fl:r]VftI£& ZHi SI?^F-])EJ>ri™C J fl£i:HftHIEiri JH this SCftDQL, 

IF ii\^ U]5lt. TOU ItftS" ^TOP THt HtCrtftr^l^H. 

TU III] 30i JU^T TVPE IW iHt LflRFrtCF NUrtBtnt 

(IHIC« ir]U SrUP THE CttlrriT-tOHri. 

fLtrt3£ HlffRI" IJIERE IS ff& TIflt fO UrtSfE ' f ' ^ ! " 1 

UHAI'lL n £f? ^ 

CffftRECT"'" 

THE tOUrtTgi]Uff Hfl^ 'srgPKiJ), 

TOIJ Hftt-eD S-^UES THE SCHUflL ■ 

CHA\"E rtJlt SEEM 1 flUfi SHl? L«K LilfF:tT *h 



JtUN 



CREfiTI'^£ CDrtPtiriHQ 
i1l}RR]Siatlff^ HEU JERSf? 



LIST 



1 
2 
3 
4 

7 
15 

3J 
3^ 
J? 
^^ 
^1 
A7 
Sl} 
73 
?II 
31 

e? 

Vi 
Q4 
95 

?4 
97 



PRlJTT TftB^243;"Caii*<T KJIJM" 

PRiJfr TftK?0Jr'Cfi£fliivE LftnPiirii^C" 

PRIHT Tflt^ig];''BBHft(5TQllfff NLlT JERSEY' 

PRIHTsfRIJITlPRlNT 

ft=IHf^nHB^t5*105 

Ealf 

pRE^r 

PRIriT 
PEl«T 
Ptl^T 
PRl^r 
PEIHT 
FPIHT 



■■VPV MA^JE i^CTE^JATE]) THg SElf-9£STRVCT nECllANISH 

"Iff IHES aCHfflTL.^ 

"IF Y&U tflSIt^ "TflU Hflf STOP fHE HECHflNllih." 

"TD ttO SOp JUST rrPC IM the CtUWEtT Hl^nsfRp" 

"tfHlCH WILL ffrOf THC CflUNTOOli^H^' 

"PLEASE HUtftTM T"H£flE IS HD TIHE TO Ufl5tE 

"tfHAT-Li. ET BE";:i*IPUT l:ffl]NI 
EF Ti-I TMtW ?B 
GflTir 2iH) 
REtl 

Pllltfl "TOUA NL-JlEEfl [idES 
PEIftT "PLfA^t TRY Al^fl[Nl 
IF T=l TMEJ^ ?fr 



tWT CDHfUTEH" 
:T"T*I 



IF T=J T"HEH 
IjCTD 14 

PftiHr 



1D5 



?¥ 

100 

lOJ 

ifli 

105 

111} 

2tD 
?35 

fOOO 



"i:ORAECT UiT fli4 

"THE CflUNIDOUrt H*i5 3Tl*PPE[f." 
"rOU HIiVEIi SAVEC THE f>C«UDt. '" 
THA^if TOU SCtH a-DUft SHll3rtE^ LATELY 

LET TMO 

SQTQ ^OOD 

rftINT -^int I|C(I1J& b^Qfilp Pi-EriSE JiURfiT 

DOTO 44 

PPINTiPSINT^PCIRTjPPIflT 

PRINT I^BU2?;"T00 LflTf 
Pi:iHliFP3«T:Pir[HTtFR[HT rflBLJ^f^-^^ *:tt* f 

PRiHT TA£iJi};"" Bflon — ■■ 
PBIHT Tftfi[J2h;V **t* \" 
ffiIl!T:?flIftT:PflMT 



■?]■ 



Ml 



SDTQ llJOfh 

PHIHT "HUPRT, THE CDUHT-MilN IB J^PPKOACHI Nlj ^£G0^ 

GOTO H4 

If I^A THEN PRIItT "TDD 5MU "iGttTO 50 

IF K^A THEN FfiJtfl "TOO £ID "iOOTO :>■? 

IF j:=a then 05 

ENH 



4 I p4 I M 



TUJ Hfl^E flCTjVftttl lift 5ELF-PEf3IF^JCT MiCtlflHaill Iff 

IF TOU Ul^H, YOU hAT ^TOF TM£ NlCNANIilC. 

TD TiO SOi JUST TYPE I« TJIE CBRRECT NUHBER, 

UHTCH UILL STOP THE C HUN T - BO IfH . 

PLEASE HUftRYi' THERE JS HO T [ilE ID UaSTE ■ ^ ■ ■ M ■ 

UHATLL IT BE"* ^J 

TOO ShflLL^iin 

rOUl HU^B^R O0F--S NOT [:Dc1FUTE^^ 

PLEASE TRT ft&AI^^H" 

UNAI'LL n BEM 

TOO SPIfli-L 

TOUFr NtJillEfl DOES (10T COitPU FE ■ ■ 
PLEftSE TRY frGfilH"" 

TlflE OflflU^ SHORT* I^LEIiSE HUftfiV 

UHfliai IT SET i 

TDO SHALL 

^auR JlirHfER ADEB MJ1 COHFUTEih 

PLEASE TEY AfialN' ' ' ■ 

HURRY, rHt COiJNT-QQUtr IS APPAllACll 1 HG iERQi'^t 

tfRAF'LL IT Bf i 

TUB SHALL 

YDUR ffUHBER DOES NUT EOJIPUTEM 
PLEA5F TSY A£Alri!-!i 

HHAI-LL IT Bt'* 4 



THIS SCHOOL. 



TOO LATE 



— BODtl - 



01: 
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sup 



Cup Js & cute little game in which a 
cup la located thirty lines down the 
paper of your terminal or thirty lines 
down on your video display screen and 
a random number of spaces from one 
to sixty to the right of the left maj-gin. 
The puJI of graviiy varies from one to 
ten lines per second per second You 
are then asked in this program what 
push you would like to give the ball 
from loft to right across the paper m 
spaces per second The program then 
traces the path of the ball from the left 
margin of the paper as it falls down and 
hopefully into tlie oup. 

A knowledge of physics is helpful If 
you wjsh to get the ball in the cup on 
the first try. However, you can diddle 
with it by trial and error and generally 
htl the cup on your fourth or fifth iry. 

Cup was wntlen by Jonathan 
Freidin. 



RIM 



CBP 



TH£ CUf IS an LINES DJ>UN AMP K 5Ffl«5 O^R. 

*'ir fULi Of AH* VEST 15 6 i-ftfrE/SEnii^ff/BECOHIf, 

U^Ae is the J>IJSJI TOU IfQt^LS LIllE TD 61v£ THL SBLL 

ACfrQfis THE t'^n^ ilH SF^ACE^/SECtrHDir B 

THE RESULTS KHT Ij^KE l^NTMMEffE BEm£M JO AMt YD SEC:flNrS. 



L15T 
1 PRIIT 
? PftliT 

3 PftJUT 

A PfrliT 



Tfli(27)r"nff» 






TOU lilSSFH: THT AQAIU. 



3* 

4t 
5C 
6« 
7* 

a« 

t:<i 

140 

MO 

uo 

110 
IfO 
200 
310 
2J0 
310 
240 
iiO 
TtO 
2JD 

2fO 

330 

3£0 
3J1I 

33fl 
3i? 
340 
34^ 

3^0 

3i5 
370 
3Bi> 
3TD 
4DD 
41i> 
4?» 
43 D 
^4l> 

44» 
470 
411} 

4fl} 
»|} 
S1l} 
SJfl 
S3D 
14I> 
2SI> 

srn 

3tU 

Jll^ 

62i 



T ft J 1 JO f J "Clf E lit t ff E tOflPUT Ilf 5"' 
TASilflli-nQSFtl^rOuN^ HEtJ JEfi3E^^ 
PRSIfTifRlHr 
DiJt S{^l>p40J 
LET L = rtfT(iO*RttDCm4l 
IF L=&0 on L^t THEN 30 
LEI O'UfTll OMNIUM I ?tt 
PRIHT -THE CtJF ES 30 LJIJ^? DQLMt AJtB "* IL r " SPAt^E? DVER.< 
PR]RT 'THE ftiLL Of BRflVlT"^ JS -;a;' UHES/5EtD*rI^/5£C[^H^^,' 
?UMT "IIHAT 15 THE PUSH TOO UDULb LEKt TD GJVE THE Aj^U' 

purtii 'AtBiJSS IHE papee: [ia spius/^uiiitiir-; 

IHPUT T 

fRI«T 'THE RESIfLTS ttilT TliKE AiTUHEfiE PETUEEN 3C AN? tO SECONW* 
FOR Si'f TD ^D:fE]i: S2>1 TO dO^£r5e,S2^=0±N£n:tiCXT 
LET 3(30pL5=5C30jL-1?=SC3OpL+II=El29tL-l] = Sl?^,l,tl>-l 
fDG Z-l TJ) SDl!i£Ofra>/G STfP ,ti 
LET T-t*I*2 
LET i:*6/2"2'2 

IP 1?3D,5 OR K.5 M T>6fl.5 K T<-3 THEN 30C} 
[f IMTCll^ST AJfH lEriTCTin THEM 390 
IF ]NT[):i^]*?f Air» iHtfTKUL ThEH 31P 
IF 1HT[j:|»!t MH iHTCTin-l tWEH 310 
IF ]IITC3)t^3:2f ARB IHTfTIH-L-t THEN 310 
IF JNTCI)*?? Ulll IltTcT)>l«1 TKEH J^O 
IF lNT[J:it1>?T ARD IHTfT}fl'L-M TKEFf nO 
lET SiXjn="i 



ret D-l ID 3 
IF K4 THEM 7fD 
LET S^iC^T-BJ-O 
irElil D 
flEJtT 2 
BOTO J40 
lET U^l 

&9TD iii 

LET 11=^2 

LET 5<«,LJ-2 

09 TO J4S 

LET U'O 

J_ET Ft=" *-■ 
LET B(30,LS'1-:5C30TL-lM:9t30^L+1^ = 1 
LET St2f^L-n*1:SC2Tjl+nn 

FOf! ki^l TD JO 

FOft ll-l TO 40 

IF SCXpXnoa TIEH 420 

HEi^T iti 

DDTD »0 

FDA T^l TD AQ 

IE J^?? DR 1^30 THEH 4f0 
[F T*« DR T-1 THEN 49D 
IE T^l OR T*5¥ THEN 50D 
TF £CKpT>^2 AHD SCJl,T-M}«0 

IF sc:Cpr»>i AHt 4(j;,TtT>«( 

NEI^T f 

PRINT 
NEXT K 
PRINT 

fP U'l THEH 57D 
if tJ*2 THEtt WO 
PRINT ""TDU HISSEJ; TRY AfiiTH.*' 

gOTEl to 

PRINT -ftTBKT INIM- 
SOTO too 

PRINT "TDLI ALHOST SIDH^T RAt^E IT, 
PRINT "ID rOU UWIT TO PLftT A^AINT 
1N?IIT HI 
IF LEf runt, 1)^*1" THEIf JO 
Evi 



THEK SOO 

ANir 1UrYf2^±0 THEN lOO 



BUT IT »OUriCEIi IKh' 
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Dealer x 5 



In Ihls game, you. Ihe pla^r, are given 
$100to siartwilh. You Ihen play five card 

games loosely modelea on casino gam- 
bling games, but with peculiar varia- 
tions. The five games are well-explained 
in the rules. 
This game was written by Thomas 

Carev- 



KLFtE I DO 
Trit Crf 
HD Fflflr t 

THE c*fin IS 

THE CAf^D IS 
5D FAEtE 17 
I STOP. THE 



IS 1^ 1 



Tfl 



-TQlftL fOP ftE LS 1? 



UHT IS THI MT^ H 

TOUfI CARS IS I: S 

SH Ffii TitE TUTftL FDf "^8^ IS 3 

BTUP [fR liD^ GO 

^aUK DARS ES A IS 

SO ffll: IHE TBUL fOR VUIJ J9 17 

STBF flff 6n-^ STiJP 

UE ARE THE 5A*1E SD « U[IJ_ FLfl^ iBAIH 

-TNE [lEflLEfr URL 6ET JII& Cflrtt^^ FlHaT 



mn 



[lEftLEfl 5 CKB3CE 

tfiEftTIVE CCIflPlJIIWl 

MRfilSTI^UKr HEU JERSET 



THIS PR[J6i:ftn lt[LL SIMULATE THE T*^^. SHDUp DEALER'S DHDJCF- 
■VBU HAVE tlflfl TD 5TflBT UITH, CHJOf Ti^E &*KE- 



FJIR THE FSf:57 [^AAEh UE UllL 
THE JJBJftT 15 SIMPIE, 6UESS 
UHEEL AHIi tU\} HILL SET PAtH 
Tltr ABE AS FDUKS; 



PLA^ m* THE ITHEEL DF CHANCE . 
yniiT SUITE ifILt- APPEflK ON THE 
AT inCiSE QIi&S IE IDU ARE Hl6«T, 



lipUhDrtDS M 11 TO 1 DBftB 

JpfHEftRTS AT 1 TD 1 OUPS 

Tfl*J BAT flET UP TD *^5, EOOIf LllCE I 



t 



3=SPrtIiE5 i*T r TO 1 OSBS- 
4=CLUB1S AT 3 TO 1 QLDS. 



IIHAT SUITE DO 7DU UAH' 

UKAT "S THE BE1' 25 

O.s:. «I|U THAT TD'JFt BET IS IN, UE UIU SPIN 

T!l£ UKEtLr COflO LUCKr 

TftE UHEEL J^ BLQl^lr^ij QQUft. 

THE UHEEL U 5TflPfLNfl* 

THE SLJ[TE IS 

Tftlf UIN 0*< JllAMDHii? 

Al THE EHU DT f^ftRT 1^ "^QD i\Ml % J?5 

TftiS rs THE 5ftnE CF lli BETUEEN. T»^E ABJECT ]5t 5 CARU^ UILL 
BE JeA^T JJUT. if AN> CAFfl IE LESS THAW A 3 aR QREATEfi THAN . 
ID. THE &AHE 15 DV'Et. TDU HAT BET DP TD 130. ^Olft RONEY 
UILL hi ICmiC EACH TIME TOU iEE RItHi . fiOOD LDLKi 

UHliT IB THE BET"' AQ 

:t*tTDU BET D^'E^ THE HfllfSE LlHIT ++* 

WHAT 3S THE &tTt JO 

ue& JiDMDEK 1 15 ft A 

TDi; flUE 5TILL [H IKE Gi^ME. "VBU ttflWE 61^ 

S^DP Ofi QD? 00 

CARD tiL'MBER ? I? ^ ^ 

TDU AAE STILL 1*1 Ttt£ QfthE. ^DU rtA^E T2C 

STD^ CE G3' tJP 

CARD WL^MEEP 3 IS A ^ 

TDIT ARE STILL lU THE 6AHE, TOB HAVE ISfl 

STOP OR G5T STOP 

Y<ll Ultt. At THE Effl Df PJ^RT 2, TDU HAVE * 5M 



HERE I ED 




THE CARD IS A 11 




SQ FAEl: 11 




THE CURB 15 A ? 




3[^ FftFt: 20 




I STDPh the TOTftL FOR *1E L5 


£0 


tiOU IfllP «Q 




UftAT 15 THE BfJT SO 




TDUR CAfit TS ^ 1 




St fAft THE TOIAL FOR TDU l5 


1 


STOP DR fiff* QQ 




tfluR CARJ? le i 12 




gU FiiB THE TOTAl ^Sff ^i3U LS 


13 


^30P HIT fllT* SP 




THUR CARD IS A 1 




SQ FAA THE TOTAL FOn TDU IS 


14 


STOP OR Bfl^ GD 




TtUlc URD IS A 12 




5D FftH THE TOTAL FMl TOI^ IB 


;£ 


TKE DEALER BtAt TQlJ . TflU LOSE 



Jtl TME EUB Of r»fi it 'OU H*^ ' ^^ 

Ndir UE ENltfi THt LflSI tHfl«CE ROUNIr. IF 'OU 
«5iJ lOI; HILT. PE flfrLt t:i go IHfO fHt BONUS 
OPJtCI :5 ID GIIESE jnfQ UM!i;il UTECDRT tuE 
UILL HBIi UP TO, THE5E flfi£ THE C":El>QfrESi 



iQTftL el- s i;*n&5 



liSI 


-4ti AT 1 ir 1 


0I>D^ 


^■J 


3*21 


-Jl AT 3 TIT 1 


QB^S 


A'l 


CiJDD J^UCHH 






Al TH:S PftINT Ih 


Ti!E GAME 


TDD 


UHAT 


CftTt&Off DO 


rou uakt 


^ 2 


UHAT 


IS THE BET"* 


:5 




THE 


CARDS ARE riOU ?ElriJ> AtBED 


CLQQD 


LtfDK" 







■41-55 AT J TC 1 ODBS 
i-20 AT W TD 1 OSnS 



HAL'E I 3H 



l*P 



BER 1 IS A 1 



CAB& HUMI 

SD FAAF e 

CARB NUHUft 2 IS ri 11 

SC FASi 1? 

CAftli KU^KEfi J IS A S 

^Q FAR: 2! 

CARB HWftBtR 4 TS A ? 

SH FAR; 1* 

CAFID HM&ER S IS A 1i^ 

5D FAAt 44 

ftl IKE END Qf THE QAHE TOU KAfE A OPAWJ; 

TCU ARE ELIDISLE FDR THE BONUS RDU«[t. 

M iQU UArtT TO PLAt L^* TEB - 

TftrS IS THE BOBliS RQUKD. iF "^Cl: QEl A T3TAL OF 1^000 

UlTHDST GETTING A 5PA11E IN THE RDLLS^ TUU UILL SET 

A tRAHD PF^[ZE OF il3H?■Ji^-0{l. TS^ flflV 3TCF AT AH"f POTUT 

IHIRIM TKE SAK- TDl URl ftttP WHAT TWJ HADE. SDOD LUCH 



T{}T«- OF * *M 



THIS IS THE CA?IE 1^F BLACKJACK ^BEALER^S CkDICE £TTLE> 

t! a JED ^5 TO PEA! Tf*E OEftLEfl «ITK DL^ER 1^ DR ^1 OR 

S^ER tS hat be? Ur TO HD. TDU NAT BTQ^ UHEN rO^ UlSH. 

ir ^QU rlAKE tLAtUftCl-H TDuR S^NET I& P(^LJBLEI^ 

If TH^ H0U5E DEALS DUT LESS THAN A TOTAL Of 1? Jtt i T^IEH, 

YDU UILL KEEP TftE JtQHET Tf-U SET- i^not ^y!^^L^ 



THE K*LER UILL BET HIS CARDS FIR5T 



TRE DICE AfE RQLL1**B 
EOOD LUCr- 
THi BILE ASI 
»^*ftSPAItEB ZW *"* 

TDTAL ?Ofl 

TOU LQEE THE MOREV FF'DM THE US r CKAWCE 

RtlllNii &UT TOU STILL HAVE A OHAND T^SAL Of * *Oti 

TRlS IS THE ERP Hf fHi GAftE. ] HOPE TOU fNJDTED 



II. 
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DIPS. 

□ma.* 



^K PRINT TftBrjl Ji-'DCAJ-ER^a CHOICE" 

im fRlrtl rllBr2^^J;"CR£fl7Il^E COrifUHHD" 

1211 FRIHT T«l!S?;"iHlRfi|3IDU'N. NEU JSRSfil" 

t3{i PftafHiPIUJiTiF-KINT 

140 PREHT MHIB PfiflQJim HILL SlilULfill: ThE T,U, gHUU* HEALER'S CIHJiCE " 

I3fl PaiiTT -TClf HAVE itCO TO STflGT UITH, ENJQT THE CfltiE.-ifHfHJ 

Hi 0=^31? 

^75 PtlHT "FQfi tffE FIHET fiflnE^ UE UIU PUT W THE UHEEl, JP CHrtJtCE-- 

IBO P^IrtT "JHE OBJEi:] [5 SEMfLf . GUESS UHfil SUITE UlLl. fll^PE^^R flit TrtE'^ 

19.; Pfil^T "UftEtL ftHB VDU U|LL fiET PflEH AT TKC^E CflDS if TDU f\K PIGHT 

-IDS PRINT "rhfT ARE AS FDUOtfS: ": PRINT 

JIU TRINT "HIiIAflDNftS AT 11 TB 1 OIHS 3*tPADE9 ftT I TO 1 

22^ PRINT -JiHEftfiFb ftT 3 TO I QITD? 4-CLJJBS AT 3 TD 3 

2JiJ PRlffl *TeHf HftV £t] Uf TO 525. DOSD LLCht ■ *i?RIN T 

2t[' Pfr^HT -^JHriT SUITE ED VQLJ iJft«T^ : IJJPUT A 

?^fl If fl > q Oft A ; 1 TJJ£J| J70 

240 IF A ^l^^fl 7HEJI 23C 

270 PdiHT "t+iYDU PICKO A UftOlfQ JUITE^^-iQJfTlJ 2^0 

280 PRINT "UHAT IE THf £LT";;L«Pur SB 

am IF ee > 73 dc bs <=' n 'rhea 314^ 

3D4 IF BQ <> 25 THEM 3Z0 

31D FRIflT -MtrCU BET OUER THE fflliSF L11IT»«":GBT0 200 

T2fl f^RJtff '[f.«. NQ^ THAT TDyR SET IS Itt^ UE U[LL SPIN- 

3311 fRlJfr -THE WH££.L. GUD& LUCK ■ " : FQfi Bl-=1 TO 1 0ta?1} i (fCxT II 

Jt{i PR:#fF -THE UHEEL [5 SLDUI«& ff04l«." 

J3fl FJ>R Ba=| Ttr 7*57{i:N£a JINPBIBT -TH£ UHEEL TS STOP^IBQ ■ 

340 FAR Bl^l TO Itli^iiiNfKT El 

37C PKIHT "THE SUITE IS -:fQf! Bl=l TQ |»ta?0 

ISO Nf(T £1 

3^0 i^LHTM^HNE[i:+-1?:?Rl|!JT "•**»";Z;-m»" 

^frO If Z*il THEH ^2l^ 

'IfO IF Z O fl THEK 470 

A20 ON Z 90 ro 430p440^450p4AC 

^30 |}-UfU]tERJ: PRINT "iOU JflH ON [JlAn(JNDB**iQOTfl 4S0 

^15 lf-flt(1**aj:fRI*H 'IJU UIN DH 3 P fiJj b ^ -* * flO TJ] 4S0 

4S0 (l"0t(3*BB]:PftI*IT "tOU UIN DN HtJ=ipr5":aOTU iai> 

4i0 il=Q+i3tllB?,'FBIHT "TOU Ulrr VN CLUES ^ :l]flEU 490 

470 a = 0-MtBe?iFllIHT "rCJ LQS£/-]UarU -Ifli) 

4E0 PR[NT "BT THE E«E OF PARr 1^ fOU HAWE fJO 

■1^0 FBR P=1 TG SifFfLNTJNEKT ^ 

^^'(f F5LHT "THIS IS ]^i OftflE OF IN fElUtE«. THE OBJECT !&■ 3 CAPOS lfIE,L" 

bFO PfiINT "B£ DEALT OUT. IF ft*1¥ CAPE IS LESS THAN rt J QB IiRI^ATER TilJ^M A" 

520 PFCrJr "10, THE GAhE ]5 AVER. fflU HfiT BLI LP TQ «0, yflUR HON£!^ 

530 PfiINT -aSLL BE ESUElED tftCW Ti^E VQ^ Ant flQHT. GODO LUCft I " i Kfl IHT 

5^1} PR]i*| ^UHAT IS FHP BET^jtlilPOT A 

SaO IF A > 3l> THIN PRIST -*t*l(HI lET flVEP THE HOUSE LIrtIT +**-:6UT0 5tO 

5iO 3=T+1l>INTn?*RNDM>*n 

5fi0 IF ; ^ 3 QJI Z J> ig tHEM i30 

5^0 if T=5 TttE*l «»0 

iOO PfiINT "rHU ftS£ iilLL IJJ THE GflrtE, TDU FTft"^ "SB 



■5TDP OR CD" 
■STOP" iHtH 



;:INPUI At: 



IF Ai^-fiO" iHEft 5i0 



"THE EEftl,£fi yiLL GET HIS CftRDS I^I£ST" :?efNT 



350 



d:0 PtINT 

6:?0 EF i^l = - 

.^30 D=^-fi 

6Ai} PRINT -raG LOST, AT THE EHO OF PfiRT 2^ TOU HA"JE ^^DiQDTO &A0 

A5^ PRUT *-VDU UlH, AT THE Eitp Of PART 2, TQJJ F^A7E r:B4nrf=BtO 

iiif fOR FM TO 5:PSINT:«EST F 

i70 PflEHF "TJ1?S I& THE 5AHE Gf frLflCKJAU <E£ALER"S CHOICE 5TUE>- 

dSO Pft[NT "TWE DEJECT IS TO E£ftT THE EEllLER UITH OVfR 17 GE 2i OR" 

d?0 PfiINT "U^SEP. tGU Jli^y E£T l^P Ttt (50, TOU *IAY STflP UHr^? TW UI3H " 

7IHI PRINT ^'IF ¥JU PA+:E BlACJUAC^, TOiJR PDJIEr IS IDUBLEE." 

/1i> PRINT -IF TKE FfDuSE C£ALE ttUT E.E5^ THAU fl lUTflL DF T7 Itt * TRJES.^ 

/2U PRim -TOil UILL KEEP THt HEN£I VQG EET, QOGD LUj:K ■ ' ;PRIM F 

730 ia"OlZH0:PR|iVl 

7in E^05CJ={| 

/50 fPI«r "MERE I GO- 

i'fiO fl"IHTM2*RHDn3+t] 

■VO Z5^Q + Z5 

7B0 PfiJHT ^TH£ OflJl|i [S A ";C:£bC#] 

?n PRIHT -50 FAR^-'p^SsIF t'd TttEH 

HOD IF Za<l? TWtN 7fil} 

aifl IF 25 > 31 THEIf ?F0 

aSfl IF Z5=21 TJ^EH SBD 

SJi" IT £5 ■; 2] IHEN 370 

340 ir 13 >x 17 TBEH B?0 

350 IF IS < 17 THEn 3?0 

GiO [F 15 >= t7 TIIEtf aOO 

H?i] PRINT ■[ STffP. ^HK ^OFflL FGP BE IS 

0^30 

Uflfl PRINT ^I SQT BLACKJACh":PJ:[flSiPOTO ?Jl) 

a?D PFr3BT -THE HOUSE EEL] OUT LESS Tli^N I?, 

■?*fl PBIBT -EEAT HE" ; iPPiNT iGDTB PZfl 

■?t^ FSIHT -I ELEU II. VOU UlK THE GPEATESf AflOLiNT ALIQU^U lU BE" 

920 PR[i(T "EET EV THE HOUSE. " ifiOTO lUU 

ViO Pi:i*IT "aHflT IS THE EEI" J:lilPtfT A 

?^0 [f fl J> T*tEH 9ftO 

?50 (f A > 51] OR ft <= THEN 9?i} 

7fi0 IF A -^s 30 THPN ??0 

y?0 PftiNT "t::tt:|j]u ^E F OVLR THE HOUSE LI^IT:**rf":ljUTC ?30 

■^Bi} PRIWT "t-ifrfflU BET Gi^EFT OHflT rOU HAVf^f-*" iGITTO 930 

??fl 01-INT[|ZiR*jBnJ+T5;PRlttT MBU*: CflRD 15 fl ";&li[:3iC3t-] 

HflO Z!'Ql*^t:PfilNT "50 FAP THE TOTAL FOR rOU 15 'IJlilF" C3=i TflEH fOfO 

1*10 IF Z] > 21 THEN ir20 

1ft2U fRINI "SrHF OR Gfl"^::]tfFUF At 



ri3:FPI*^I "NOU TOU OD" iPPIN F :GUI 



HGU rm riUST TUT TO' 



1170 



1030 IF A(»"BTOP" ]BE^ K3D 

mo IF fl1="G0" TREtf ??0 

IO^l> If ri>;s THEM 1100 

tOSO If II < « THEN 1120 

107V IF 21 = 23 THEN 1110 

lOBfl IF 23 CZ] THfH IUO 

li>?e JF 2t < 17 THEfl 11411 

1100 PBIilT »y£ ARE THE 9ArtE SO U£ LflU PLfl^ fl0AiN":G0T0 ^30 

1T10 G=[;4r2tA^F*irs*iT °tou n^f. ?«e dealer n-r^f tLAt^jACKiM-^jBora 

ItSQ 0-0-11+AJ;PBJ*|T "IttE &EALER BEAT TOD. rOU LUBf^ljUEQ at70 

1U0 O-0fC1*A]tFBIilT "THE DEALER LBST. ¥011 Uifl-tBOFU t17g 

mo O"0tilt=Al;PS[H! "THE HOUSE EfLT 03T LESS THAN Ij IH' 

1130 PRINT -fr T-RIES. TIfy OtT THE a&HET TOU &Er":[}OrD tl70 

lUO O=0f3O:PRINT "YDU ESEEP IT OitH JIUR EEfiT HigMEO^-lBOTO 1t70 

1170 PPINT 'AT THE ENJI flF fflBT J^ TQG MAv£ 1^;0 

fl80 If 0<=0 tHfH 13B0 

11^1] FOR F=l TO S^PRlNTcHEIf f 

lajn pklb: -auu u£ Et^rtfi the Lftsr chabce kulirc, jf you hake up to" 

1210 PftTitT "UOO TOU UILL Ef ABL£ TO 60 IHTQ IHE BflHUS ROUi<a, THE" 

12?0 P«ilT "OBJECT IS 10 SUES3 ]ttTQ UHlCK CATEGORY TriE lOfAL OF 5 JTARD 

1230 Ptfiir "HILL AOU ItP Tjl. LHl5t flBE THE CftTtljUKltSi-^PfLlrtl 

1240 PRIHT "l=3]-^0 AT 1 TU 1 OBBB 2M1-&0 AT 3 TO 1 OBBS" 

1230 FFflHT "3 = 23-:i AT 3 TO T 0B3JB ^^i-20 AT 20 TQ t l?EP'5" 

12^0 PRINT ■■GflCB LUCKi ^"iPRlMT 

1270 PRINT "ftT TilEE POINT I« THE OflHE TDU HAUE i";0 

1200 PRINT 'UHAT CAtEeilRT ED rOlT tfflNT";;IHFUT A 

12¥0 IF A <= 1 THEN 1320 

Uii IF A > 4 TBEI 1310 

1310 PRUfT -ittroij SET UH A UROMO CATECOPY^^tt'iDOTQ 12Ba 

13Z0 FRIHT "IIHnT IS IHE BET";:INPIJT B 

133E Ef fl ^= E THE^ 1 3A0 

n^O IF E > TtJEil 1JM 

UJO FRIHT "M*TO0 B£t OVER ilHAT TOU HAVE***":flOTG 1320 

IJiO PRIHJ "THE fiiPCS ARE flO^ b£iJ(& A3ItE]> GP":PEllNt -QQUIf HW:E( l " 

UJO [(-INlt]2i*^NDL3li^lJ;Lt=C1tl 

13fl0 fRIWT -CftRB HUHBER ";ei;" 15 fi "[Q 

IJflO E=2t-a;PJ^UT -SO FAR: "{h? 

HflJ? IF i:E=5 TftEW M2il 

H10 fiOTO 13P0 

14^C OJt A &DT£l lJ30,HJO,MV0p1320 

1430 If I < 31 THEN 15^0 

me 1£ 2 < ^0 THEi^ 15:10 

M50 :f 2 > 40 THEN 1ia^0 

1440 EF Z < 41 TNEH 1^40 

^^■'D IF Z < 50 TJfFrf iSfiO 

HBO IF i > 10 THEtt 154Q 

too IF Z < 21 THCW 154S 

1500 IF Z < 31 THEN I5ri0 

1510 IF Z > 3T THEN 1540 

1320 IV I < ^ TBEH \SW 

1530 if I < 20 THPIf 15^ 

1540 O^D-[]fE!:fRIhT 'YOO LCaE"SBDT0 tSOO 

1350 a=Oi-(l*B}dfR[MT *i[fU UIre";DOTa I5B0 

15^0 a>0«C3*B]:GOT0 I^Gi] 

1370 D>Ot ( 20 tEh PRINT "VCU UIri":GDl3 IMO 

1500 PRINT "fli THE ENE Q[ TNE GAME TOU Hfi'Jt A OITArfO TDTfll Qf 1^:0 

T390 IF D i 300 THEN 19tl} 

liOO FOEl I"! TO 0;P«HT CHRt<75rrfOR Bt = 1 TO 570lNEl-f BTlHEIT X 

lilO ffflMI -TOO ABE ELIGTELE FQS TJfli SGUUS RULJNE.- 

1420 FRIMT -00 raO UANT TO PLilt [T";;[rfPUF A't 

U30 IF At^-Hff^ T^EH l?4fl 

U40 PflJ«T 'IBIS J6 THE EONUS PDUNEh IF TOU 1JET rt TOTflL OF 1 OdO^ 

U50 Plll**T "UITBDOT OETFlJlG ft SFflEE !JI THE ROLLS, TDU UILL GET" 

iJfiO Fill^T "A OlIftNU PR(£E OF *10,00l>.DO. lOU r1Ji"r STOP flT ftJf^ POIflT* 

1^70 PfiINT "rnjRJNG THE SftHE. i"OU HILL BEEP IIHA f TOU HADE. GQaB LBCH"" 

I £80 PFlPtT 

ffi?0 &]ii At5?,B^^J:A?* = "SFAPE5" 

1^00 PRINT "THE BECE flffE ROLlINfi'iPRINT "0000 LOCK.- 

17S0 PRJRl -tHt IrIC£ HlE" 

17^^} FOR E1=] TO 170t55NfKT El 

17S0 K^L^Fi5:i=Rl|BM^^T3 

1740 fllTJ'30:flC2? = 10O;ftCJ?-Jl50iAC4)=2fli3sAill»e 

17S0 l>INTU*RNEC]h*ih 

IJiO tCI J=50:EC2h = 100:ln3J=-150:B143^20O 
Ui'O [F A1K^=0 IHEH ]??D 

V'SO PRINT "+M*";ACX>;B(V^i"4**:*":Pfl!HT "TOTAL ";fta? +B:r] :0OT0 IfllO 
i;?& PRINT "*-***"rftYt;ff(T?;"+t**' 
TflOO fftlJfT "TDTftU TBCVJiGQTO TB/q 

laEO E7=-B74[jiLJ:J^BCV^?iPfl|NT "TGU HJ30 HAUE "JB^rlF 17 >^ TOOfl THEW IHVU 

1820 PItlBT ""STG? BR 5Q":INPl*T B4 

1B30 TF Bl="GB" TilEN 1700 

-Iff^i- PSmT "SHAHT HOVE. VOU GET THE HONft Fpijfl THE B£iJIrtHI«G OF' 

1B50 PfilHF "THE GflflE PLl|5 THE BONUS f^OU^e. AT THE EftQ 1)F TrtE GAhE." 

IBiO Pfif^T "IBU HAIlE THl SRANE JflTAl OF *";B^tlf JIJOIQ 1V40 

1E?0 FRIHT "TAB L05E THE flONET FJlOH THE LAST CHANt E" 

1SE0 PRINT "RJiUrtO BUT rOU hUli iJAV£ A liFTflWE SOTAL GF ("^O-ljOrQ 1S40 

U^Q FOt T = ] TO 3:PPE*IT CHiltL7]-P0R B1=-l TO 570:riE>:T ElfWtH T 

1?SI> E7^D4lOlJ0lJ:fHa«r TflBC]5);*t"tCl)NQRflruLATJGB3*t+*'- 

19iO PRlitT -TOU UBN Th£ &ftABE PJlIZZ, 

1920 FOR P=l TO 3JPRINT:NE^T P 

1^30 PfiI«T TABne3;-*r*i**-jE7;"*MM*" 

J?^0 PRINT "FEig JS TffE EdJ& (JF THE RriHE, J HOPE TOU ENJQyEB IT 
1?50 ENlT 



AT THE EHB OF IK SAKE, TEU NAVE" 



4S 



Decpspace 



Deepspace is anolrter version of a 
apace battle. You become the com- 
ma rider of eilher a sco jI ship, cruise r^ 
or batlle&hip. You then pick the 
weapons, and planetary systerr to 
palrol, and it's time to do battle. 

The closer you get to the enemy, the 
batter your chance of destroying him. 
Unfortunately, his chance of destroy- 
ing you also improves. It you get Too 
close, you can damage yojrsdf, when 
a vessel's damage rating reaches or 
exceeds 100, it's destroyed. 

SuggBsrion: Change the time 
between reports— this win shorten the 
game by allowing you to get oJoaer 
faster. 

Deepspace originally appeared in 
Cr^aUve Computing, Mar/Apr 1976. 



i ACTIVE HrPEBOV HfUIMLlZ41|Dtl riEUI 

i SELF-D[eT»LlCI 

7 CHfiHSC VELDClfr 

T PrOCEEl 

TDJ HIVE « CHDECE OF TNBFE &T&TEKS ID PliliraL. 

1 OFiav 
; ButJ 

SELECT Ik ;TSTEfl(l-I>T 3 

UH1CH SPACECKfifl JdULD TDJ LIIEtl-S>t 2 

TOU KMt 2* VH}$ OF ZttSQ SPtiCt. TO FILL UITM JlAPOHItr. 

CHODSt fl bCAPAll MJ) THE AnOUNr lOU UESH.'' 1,1 

TOU HbVE 1J UDITS DF CAHDa SFACf 10 FILL bflTH UEAPOKRI, 

CHQDSt f Vili'-lt "p THE AHCIJHT IDU UIEH.* 7,1 

Tint H*VE B imiTS ar CUfiQO SPACE TO FILL UTrH JEAFMfT. 

CiDG^E A UEIPDV tU IKE JiHOUilE TSIl UlAH.? 3,1 

VDU HikliE I UH1TE DF CliltEO ^PACE TO flLL VlTll UEAPOKCY. 

[iiaosE Ik oEAPCm MP the aadvj't idu htsh.* *,? 

RHOE T| TlilTBFTi 743. 4f I 
PELAim UELQCITTE i.lAtiA 
ikCTJOHr V 



nM 



DCEP3PACE 

CItEAtJkt COHRJTTIIB 

IDItlBTOM, HEU JEAKT 



IWIBE TO TAVOETl t0?,4«7 
l^millE V£LDi:iTT] J. 24434 
fkCELOlf f 



Tin IS tEEPSPACE, A TACTICAL aLHUUTlQH 9F SHIP ID SHIP 

ClhlAT III KFP ^DtE- 

EO TDU UJSH [USTtOCTTQUST Ut 

TBU AVE DK DF A fiAQUP Iff tfPTAIIB ik^lONEB T9 PATML * 

SECTimi DF TOUF EIAF EUPSBE^t iORKK AEAIH5I HOSTILE 

ALIEHS. ALL lOUR CICOUffTEVS HERE UlLl BE AOAIITST HITILE 

VESSELS. TDO UILL FTIST |E REDUlBtl TO SELECT A VESSEL 

FIDH (UE OF TWtEE TTrES, EA^h UITI IIS IWI CIIARKTEiriSTlC3i 



TTPE SPfEl 

1 1EDUT 101 

2 cnilEt 4f 

3 HTtLEBHiP 11 



CABOD SPACE PVDIlClLlXl 

** ' . 

U 2 



■^ 



VtEl IB OJVEl lELATIVE TO THE DIHER SHIPS, 

CAteO 9*ACE IS IS OSIIS OF SfAGE ABOAID SHIP UHICH CAI K 

FILLED UITII lEAPOHS. 

PirDrECTlOW IS the KEiUnvE SltEHETM OF THE SilP'E HHlft 

AIB fOftCE FIELPS^ 

OHCE A SKIP HAS BECH KLECTEB, TOU HILL IE IIISlHlCTEB TO ikM 
II aim BEAPOHVT FtDH IHE FaLLflUlH LlSTl 



TffE 


cmrso SPACE 


EL. 


EFflESSTK 


1 f HASEt unt 


.« 




4 


2 itfll'IATIEll HISSILE 


4 




30 


3 kTPEIBPAEE LASCt 


A 




1A 


4 PHOIOV TOVPEBD 


1 




1* 


i HTP0DII HEUTIAltTATKI' FlELt 10 




A= 



UCAPDJIS II t IS CM le FJICD 1C« TlflES EACH; ALL QTJiEBS ClIH 

B1 F]|E> MCE. FOR EiiliH OH KJtlD* 

^ TTPICRl LI^AD FDI I »UlB€B lIGiT [H315T DFl 

1-M PIMItft Mm - 12 

a-13 lirfFRSPACE LNKES < I 

2-14 PKBTOH TDfTPESDEE ^ 4 



24 UttlTS DF »K0 
A Iffltri DF CftUTIDHt FlUIIfe I^T&H rULi UEAPONS AT CLOSE «1l4> 
RMIt CAN IE IAM6ERair^ TQ TQUft SHLf HI fllVlML DAMASC CAN 
occult A9 FAIt lUT AS 2ID IH GONE CLfrCUHSTAKCES, 



RUSE IS GLUEN tV iKDtlSiltffrS 
ftAttJEVEE CMIfT 



DF KELDHETERB. 



1 FIRE PHASERE 

2 FIRE IHTl-nATIER lll»lL£ 

3 ritL N'TPERSFACE LANCE 

4 FlIE FHDTON TORPEIB 



RAISE TQ TARGETe A2C«'(J 
RELATIVE VElOCTTTi 3.?AAM 
AEIlDirr 7 
CHMICE TO BE 'EFFECTEDT >3 

R4R5E TD TliftGETj ^20.703 

RELATJVC VELOCITT; J,7»14 

ACrlONT A 

ECAIWERS REPORT FflEHr DAN4GE NDU: 4.5U3a . 

DINAEE tOMrtOL AEhlRia TOUR VESSEL DANAOE AT| S-SOKjE 



RIHE TG TARGET I S4?.271 

RELATIVE <ELOCiriJ l4 7AtS4 

ACT10IIT 1 

«CAHHCRS AEPORT ENEriT IMIGDE MUi 5-3734 

BAHASE CDHTRDL REFlKIS TOlJl VESSEL MlAGE ATl 11.7794 



NAflBC TO TAR6£tt 473. V3f 

REIATIVC VELOCIlTt 3*74634 

ACTIBHV 3 

SCilltNCRS RCPOIT EHENY SAriAGE NCHJ: 23.tlf7 

BAHAIE CO'TRIL SEFDRIS tCHlR UE^SEl DANIlGE ATi ?0.3S37 



RliHOE TB TARBETl 404.407 

RELATIIIE lELDCirrt 3. '4134 

ACTIOJIT 7 

SCAHHEIS REPffilT ENEMf UMiGE ttl3Li 4J.fl73R 

MIASE CIMIROl REPORTS TDUB VESSEL lUUGE ATj 32.0(49 



RGNBE TO TARfllT: 33fi.t75 
RELATIVE VELDCITTx 3.74AS4 
ACTlliTT 7 
ClUGG 10 BE EFFETlEIT -? 

RAREE TD TAR5ET: 37A.f73 

fiELi^TTVE VELGClTYi 1. 74154 

ACTIONT 1 

SCANHESS REPORT £NEMr IAHAOE ECUIH 34.5871 

DMReE CDHTktDl REPORTS TOUR VCSSEi. IkAIUSE i^Ti 4t.>026 



RANGE 70 TARGET: 7fB,^lf 

RlLATrK VELOCITT: 1.74*34 

ACTIGHT G 

ANOTHER BATTLE^ HO 

TRT AfiAIH LATER! 

Di; 



46 



fOfl FRI«t TJe^?^5;"Il£EP&FAC&■ 

11^ ffilr^T TftB^ZflJ; "CHEAT I";E CflJIPUTING" 

E24 PRINT TAB4^fl?;"MQRRISTDllN, FffU JtRSEI"' 

UD FRINTlPfrrHliPfilNT 

130 PRINT "THIS I^ DEEPSPrtCE, A TACTICAL SIMILATION OF StfTP Tli SHIP" 

UO PRINT" "COHfiftT Iff DEfP 5PACEV 

170 PHIHT -DO TQl* UISH INSTRUCTION^"; iIJtPDT 1* 

iBfl IF It^"ilD" THEH ^tQ 

^0^^ P»]*IT 'YDU IiRE OKE DF ft SftOklf BF CftflfllffS A^BIGNEIi iO FftlBDL ft'' 

21l> PRINT -5EC1IDH OF TflUt SlU ErtPIRE-'S BaRBtR AflfiJItST H0STIJ_E" 

aSil PRINT "ALIENS* ALL TOH EHCOUItECRS H(R£ ttlLt &E rtflflJ^ar HDSTILE" 

230 PRINT "L-tSSELS. IflU l*]LL FIRST &E HEOUIREB TQ 5£L£CT A yESSEL" 

Hi PRINT "FRDfl UNE Of TflREE TTPESp EACH UITf* ITS DUN CHftRACTER^STltS:* 

260 P(II«TsPRINT "nPE\"^ftFft\"CARGa SFftC£%"PRUIKtTiait- 

2Jfl PRI*tT M 3CaJT\"lOK',Ni%"t' 

2fifl FRlflT -2 CFtll[5CR"p"«"p"2rt'"J' 

:P& fRIHT ^J ffftTUESftlP-.-^^H^/^O-r-l- 

310 fRINTtF(rJ**T 'SPEEIi IS GIVEN RELATIVE TO THE flTHER SHif3." 

IZO PRINT "CAflGB SPACE U IN UNITS (IF SPftCE AlHRP SHIP UHICbt CAN iE" 

330 PRINT "FILLED U|TJl U£liPD«S.- 

M PirlWT "PRDTECTISH IS THE litLAfWE STREHGTH OF THE SHIP-'S ARUDB" 

310 PftldT "ftHC FDSCE FIELDS." 

3.*0 PftE*IT:PR[NT "QHCE fi SH[P HftS BtEW SELECTEB^ TOU UUt. BE INSTRUCIEB T 

G ARM" 

,?flfl FftlHT -IT UIT« UtilPeNRi PHQft THE FaLLOUINfl LMTi^ 

390 PRINT 

^l>0 PRINT "TTPE CrtROD SPftCt REL. STRENGTH'' 

^11? PRINT "I PHASER BAHK& 12 ^" 

^20 FBIHI ": fl*fTI-rtPTTER flISSllE * !(' 

430 PftLilT "3 HTFCRaPflCE LUrtCE < 14" 

44fl fRIttT *^ PJ^OTflK TORPEDO 1 '0' 

«0 PRINT -3 HYPEtON NEUTRflLI^AT IflH FIELH 2D i^ 

fl?|} PRIHT:PRIHT "HCflPO*<S i1 5 #1 CAN BE FIRtH lOO TJNE5 EAC«; ALL 0THEE5 

CAM' 

flOO PRINT ^'BE FIREIi DNCE FOR EfiCH UH fiOAfm." 

^?0 PRINT "A TTPlCfiL LIfAO FOB A CPUI^Eft fllCHF CONSIST GF:" 

500 PRINT " l-*t PHfl5£fr ftAilk =i 12^^ 

510 FHIHT " 2-*i3 ilTPERSPACt LAN^E? " 9" 

520 PfrllfT 'f 2-11* fHOTflN roRPinoES = ^" 

530 PR1«T " — " 

5^0 fJlTttT " 2^ UHIT3 OF CAftfiD^' 

S50 fprlHT " A UORIi DF CAUTIDN: FIRING H[OH VIELD UEftPBNS AT CLOSE iODOS 

340 PRlRT -AAJIOE CAH E£ LANGEIIDUB TO rOUR SHlf AN3] r1|HLHfiL Ili^HAG£ CAN" 

S70 PRIH^ -OCCUR AS fAR OUT A^ 20<i IK SOHE CE ACtMS TAKE 3 . "^ 

5?0 PRINTiPRINT ^'HAMIjE IS GCvEN IH niQUBANHS DF KILOnETERS." 

dOO ODTQ 610 

ilO PRINT "CO TOO UISH A HANlE-JER CHART-^f iltJPUT Nt 

420 IF rtJ="NO* THEN ?70 

i40 PfllifT " t*tt**:MM**«** 

^SO PftlHT " tiAMUEVER CHAfiT"fPRlHT 

i7& FJll«T '1 fm PblASERS* 

^flO FRI«T ' 2 FI*E A**T]-rtATTeft HISSlLE" 

i^Cl fRIMT ' 3 FIRE HYPERSPACE LANCE" 

.^00 ffflfll *■ 1 FIRE PHOTON TORFEDD" 

^10 Pl^lHT ' S ACTII/E NYPERON HEUTE4ALIZATIDH FIELB^ 

720 fRIHT ' 6 SELF-HESTRUCl- 

730 fRIJ^T ^ 7 CHANEE ViLOCITT^ 

710 PRINT " S mSENSAQE" 

750 PRINT " ? PROCEED" 

??0 PfiINT:PJI]ftT "fOi^ HAUE A CHQICE Of THREE STSTfHS TD PATRilL /' 

7&0 PUNT "1 OHDJI' 

7?0 PRINT "2 lENEB* 

SOO PfllNT "3 AROTJPlfS" 

310 PRINT "SELECT A ST5TEniJ-^J"; [ IHPUT Qf 

920 IF ST^I THEN 23B0 

030 ir Sf-i THEN 2130 

Sid SOTO 24S0 

930 IFO=0 

a&fl Di-o 

S70 HI^O 
fiSO Jf2«i) 
BVO H3=a 
9 DO N1-0 

910 B=^J 

9W PRINT ^IIHICH SPACECRAFT ifDLJLIt TOU 1_ IKE f 1 -3 ) * ; ^ lilPUT 3 

?30 DM 5 50TO 1 710p 1 BlO J 0/0 

?dO OOTO 920 

970 C^CO 

?S0 PRIST "TOU HAUE ■;C;"1]«ITS DF CAROD SPfiCE TO FILL WITH HfflfDH«t^' 

?n PfllirT "Ci40i|SE A UCAPQM AND THE ANODHT VOU U ISH." ; :IMPtJT UpH 

1000 JIN U SOTO 3?10r^0l{ir2f00p2l?0p22A0 

1050 OOTO 9^0 

1040 IF N*C1>C TNEM 2530 

in70 t'C-«*Cl 

1D«0 OM U GOTO 1 9^0^2030^ 21 70 j22dO 

1120 aOTO 23i0 

1130 IF C>3 TilEJI ?aO 

1140 reh 

11 so Sl*90^RHBfO] 

1160 R^43*RNI]CO?-^5? + ]00 

ItaO PRIHT:PRLSfT "RANSE TO TARCET:":R 



tl90 PftlHT "RELATIUE yELOCl ETt-;51 

1300 PRINT -flCTEOH-JiJHPJT H 

1210 ON P OOTO t?40T2Di0T3l2Op2:?10p231Op1640pl3flQi27SD 

IJflO IF R<500 THEN 15D0 

MH ]f S1>0 THEH 133D TJ70 S0^2 

1110 P-fi+[Si'B-3ri-?l isao co=3a 

1J2D GDTD 1310 iSfO PO-^S 

t330 R=R-CS1*e.3IM*a! IfOO GQTD 970 

1340 IF RJTSDS THEN 2590 I9l0 CJ-12 

tlSO IF R>0 THEN 1370 1930 GOTO 1O60 

^340 R=-R I^^O P]=1 

1370 PRINT 1?50 IF P^t'0 ThEH ?tii: 

13B0 SOTO IIBO 1TA0 N1=4l1-1 

n90 PHiMI *CHAWBE TQ St EFFECTED"; ilffPUT 32 1»70 Z^2fl0 

1400 If 151VS2J>S0 TdEM 2550 IW SOTO 1430 

1410 S1=SHS2 19?fl N1=Jtl4N 

U20 HDIO 11S» 200D QDTO 1130 

Tl3i? FD^P]*tZ/ftn.5 2011] C1=^ 

1440 PEA 202D GOTO tO^O 

1*50 D0^C2*F0t3-tf0-*RHTJ[fl?]/3 2030 Pt^^O 

I4t0 D-r»tDO ?04D IF N2^0 THfN UM 

H70 PRINT "StAMtJfftS REPORT EMENV OAhADE NOU^iD 2050 M2-?N2-t 

I4a0 IF 0>9? THEN 27J0 2060 2*500 

H90 BOTB 1510 2070 SDTD 1130 

1500 DOi^O 20B0 H2-N3*r* 

1510 HEM ^090 GOTO 1 1 3fl 

iJJO tL^EHE2*RilBC0] 2]flO CJ=* 

1530 REh 2110 QOTO lOAO 

mo E=E3-^E1=^RHIllO]+5l'PO^RHBlOJ 21J0 Pl=14 

1550 REH ^130 IF H3=>0 THEN 264i 

1S40 F3-E<(M/tKKa5 2140 N3=M3-1 

1370 Il2 = f3*F3-^3:tF3l-R*ID^D3^^3.3 2150 Z^550 

1560 D1=Dl^02 2U0 QOTQ 1130 

1590 IF {Z*B0)/fR*50D3>?.2 THEN 1670 2170 N3=M34d 

1*00 D3'OO*2/1R"2*P0^ 21B0 GOTO 1130 

U10 D1=JH4Ei3 21?0 C1=2 

1620 PHJflt -DAHAGf CONTROL REPORTS TOJR ■JESSELj^ 2?00 OOTO IQiO 



1i30 IF Bt>T9 THEtt 2710 
1640 IF ti>?9 THE** 2?60 
1650 GDTD 1300 



2210 PI-^10 



^OAP+AOE t\ir*0} 2220 IF IH-^Q THtN 26B' 
2230 H4=JI4-1 

litO PRINT "SELF DESTRuCT FAILSAFE ACTiyflTEC'i^ 2^40 7°1l|0 

1A70 PRINT "INPUT 1 TO RELEASE FftlLSAff; I INPUT U 2250 GOTO 1*30 

UBO tf U^f THEN S70fl 2240 H4=:il4+N 

1A90 OJITO E290 2270 OOTO 1 130 

1?00 PHIMT "SELF BESTflUCT ACCflfiPJ_JSHEJ)* 2280 ei=.2fl 

]?F0 ]r R>60 TH£N 1740 22?fl H-=H)0 

■\?2^ PfilHT "£«EJlT I^ESSEL iU_SQ BEETlLflyEIi " 230fl GOTO 1 0* J 

1730 SOiO 2760 23ID PT"4 

1710 D4=32007fl 2321] IF H5^0 THEN 27l3l 

1750 D^D4D1 2330 *fS#H5-l 

17iO IF TJ>9? THEN 1720 IHH 2 = 250 
1770 fRIAT "ENtttT L^ESSEL SUPVlUES 411 T N " ; D ; "D A^^£ "- 2^Sl> OOTO HJO 

1700 SOTO 2740 2360 #5=N5i-ff 

1790 SO^ia 237D ODTfl 1130 

ISDO CO^TA 2^00 EE=L50 

IS10 P0 = 1 2390 ES^SQO 

1020 SDTD ?70 240D F3^ 

1B30 30^1 2410 El^l 

1040 [:0 = 24 2420 GOTO 850 

1050 PO'2 2430 £1^200 

1060 GOTO 970 2410 E2=350 

24S0 E3*1 
2460 E1=3 

2470 OqriJ B50 
24S0 E1=T50 

2530 PREHT "MT fHUGH SPACE. J^ESELEl^T" :i90 £2^lD0 

2S10 OOTO ?0O 2500 E3=5 

3!^50 PPm 'CNAKGE DEVOND rUIINUM POSSIBLE'* 2S10 lA*2 

2560 PRItiT 'INCREASING TG HAXIHUN" 2520 GDTD £50 

2570 S1=S0 

2ja0 GDTG 1300 

2590 PRIJfT 'OUT OF SENSOR RAMGE. AAUTOHATIC ItlSEHGAGE." 

?dOO OOTO 2740 

2610 PRINT "PHASER SAMKS BRAIHEI}' 

2620 fRIflT "SELECT ANOTHER COURSE OF ACTION" 

?630 SDTQ 1200 

2610 PRINT " ALL ANTT-flfrTTER HISGIES ERFEND^D' 

2650 SOTD 2620 

^660 PRINT "ALL RfPfRS^ACE LANCE9 E^PEHDED" 

36?0 BOTO 2620 

2600 PRINT "ALL fHDTDM TORPEDO TUDES EHPFI" 

2A^t flOTO J630 

2?00 PRINT "HTfEIIBN NEIJTRALIZATICHI FlELIi BRAIWEH" 

2710 GOTO 2620 

2720 PRINT "ENEHT V£S££L DESTRDTEB" 

2730 GOTO tSIO 

?740 PRINT "iOOR uES9iL HA5 SEEtJ lE^TBOYEr 

2?fiO PRINT "ANOTHER BATTLE" JsIilPUl R* 

2?70 IF Rt="TE5'" THEN 010 

2780 PRINT "TftT ftOAlN LATEfil" 

27f0 EMB 

DK 
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In Ihis game, you are In an en- 
perlmental building wilh one million 
rooms in it. Ttie building is one 
hundred rooms long, one hundred 
rooms wide, and one hundred Toorns 

high. 

You have jual received a telephone 
call from a mad bomber who tells you 
he has planted a bomb someplace in 
Ihe building. Fortunately you are 
armed with a bomb detector thaf 
reg isle rs a strong er an d stronger sig nal 
as you get closer to the bomb. Vou starl 
at the bo»om right-hand door of the 
building, at the room 0.0,0. In response 
to me signals from your detector, every 
ten seconds you may try a new room to 
search for the bomb. Vou have two 
hundred seconds or twenty trials to 

find it. 

It's fairly easy to find the bomb onco 
you get the knack of how your detector 
works. However, we're not going to 
spoil it for you and tell the secret 
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70 
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37 
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KEU JEBSET- 

ElPEPTPFMftL BUlLCKfli UlTH" 

T(f IT. THE lUlLHIrt IS IBC ftOWlS" 

tatms ifrwffH-jffi, fiHB 100 snoK wjrmo-^s)." 

IS BlBSi*, IHE BJIM aE*IQ5 DUL S:S'<*lS IHftT- 



PKliiT -(El ^inmbCB n^ rou 

fHIH -TO DFKEl«rC TT.- 

pfiliTid'HiT 1 1 oaumfti I • 1 rB=iJimBO-MB( T i > 

C.[||T[10C«IIIIB(IH:1F S>0 THEIf VO 

IF l>0 THEH »C 

IF C'fl THEH eC 
B=0iEO;F-0:Q 
I PFT 



6ET tLOSEfi. TDU HME ?00 SfCDJfliS' 



llfT riit(3SlT"S".-lTflB<SC)rtOO*lB3''*'^tSit,U,ll>' 
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til} 
IK 
Hfl 
H5 
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170 

ie3 
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1B7 
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1*7 
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2ie 
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2^0 
73 P 
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T1iO(i3-Bt&(l*.'15fi-'B'i:<>50J-(&/lOO'E-'F«ll)Dl: 
TflB11*>iBjl«M»J!E;TfiBiJ4>;F^IAB05):C;rf 

M,f:*-B'lOTlE K>0 IHEII !« 

lOE THEH 130 
C-F IhiH 170 



UJ(I»; 



IF 

IF &'2D0 IHEN HO 

BQTB ISO 

PITIBT 'lOOQClOfltfBlK-irifl-T 

fRW. -SHE BOflB iJ"^ LStfiTEB 

pnnr -uftiT lu PUS fliftiH-; 

IftPOT ZI:IF lEFrK7*»lJ'-"" THEH ?» 

ftim -BOBB BEltElISftTEll *T-lO;" BECQllPSi' 

IF BJ" THE* ZOO 

!F B(0 mEtl 2D0 

If EJ»9 THtN ?Ofl 

IF Cie IKED »0 

TF F>'» THEIf 270 

IF F'D TIEII ?30 

eCTD 110 



-(BL BLEU [T, THt B(llLllltf6 BIEU UP." 
ilT THE COQBnillllTES[L.*l,rtH-rfl;H;i:iMHirT 



eQUIO i^O 



PHIBT 

PPlfll 
PBJtfT 
PBIbl 
PtLiNT 

pFum 



fit UIUBOU Ur THE-!:TF f<4 THEN M 



-mif LALIED OUT 

F;-rH FlOORnr 

'tm Ktl KILIED ft1B";JCa-6l 

-BLEU ITP' I '"iBIlTll 150 

'TfUl flPE IfOll^f-?:- FEET ]« THE fllPm'* 

-TIHI ARE Mif"; 'l»lFt¥J -FEET IIHBEfflJBfllinB 



SECONDS UIEP THE B'jRniNe- 
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M"jB(1TE1 
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£[f TO J UHHT USTAJ[:TIDKS FCn DOBDEA? f 



HEAE^S Ih ^MFiE ft'iYIHO 9«U| 
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TVll 9ETS Of PIECES CDIEITS AM? LETTERS^ IMCE i^T RIGHT AKJjLEB 
ACIIDS3 n SQUAfiC IDAPD. VHUNT LOCi^TiCmS Ki SM)tJtt ii? PERIODS h 
fCU CHOOSE IHE IKE BOARS ^tlt CtHE ONt ABDVE IS SIlE ?. ? 
If 

a— E 

I 



THE GIJECT TS TD J1QV£ ALL OF TQIff PIECES flCfCOSS 1HE BSMfD 
All Off THE AFPDSITE EDOE. DIBITE LEAVE THE BOARl Q^T AT 
THE EJ^STEftil EUSE; LETTERS ONU AT THE HOAThEFWH THE UlHNOt 
IS TRE PU^£R UHOSE PIECES HAi^E ALL LEFT THE BDA^^Ei. 

iHf FUTERS RH IH TURW, KOUIJiS ONE CF THElfl PIECES TO AN 

flWftCFliT LflCflTCH amCM 13 FITHtft OFF THE lOrtRD ilF CURR£NTLT 
VftCAKT. TH£RE ARE HJ/ HIA&DNAL ftOliESp KQ JLJflPS fittC ^D Cftp-TURfS. 
^IfillS CANflDT HOVE UESTp JtDf! LETTERS HOVE GOUTH^ 

Ttt HOVE ft PIECE, TVfE ITfi HAHE flH& IHE flJaT UTTER flF THE 
LESIfTEl EilRECTIOH. EXAHPLES^ 

2i HEAHS THAT PlE£E 2 UilNTS TD 6B EA^T 

BU MEANS THAT RIEJ:E f UftUTS TO SQ UEST» 

HUTE: TOU FDEFET TR£ GAHC IF lOUfi HOVE LCAVES TBUR DFPi3*IEHl 
VITHOJT AHT LEGAL HOUE. 

Li^lLTp reu Mt TTF^ R TO RE5|0^ AhT^ fc FOR UEtf^ 

BIMRH SHE <]-6]? -^ 

KOU MH\ FLA'TERS M OR 2>1 T 

Okt THE COHROTa URL JfflVf THE IiIfi3TS. 

HHD AUVLS FIRST { I^COHPU^ERt ^^TDV^t 2 

HEITE HE 00... 
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3 . 



LETTERS tfDVET CH 
THE DLSITB riOL^Et ]£ 



I 



DODGEM isaganreoriginally devis- 
ed in 1 972 by Colin Vout, I her a student 
at ihe UnivHrsily ot Cambridge, 
England. Jl got its ma|or publicity from 
Manin Gflrdn£;r who discussed I! in Ihe 
June ^975\^^[Aeo^ ScienrHfC American, 
Complete instructions are in the sam- 
ple run. 

It may be played by two players in 
which case the computer is Ihe referee, 
or by one player against Ihe computer. 
The computer, incidentally, plays un- 
commonly well- This IS not surprising 
smce Dodgem was written by the very 
talented and prolific Mac Oglesby. 



LETTERS HdliE^ M 
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LETTERS HOUE^ Cn^ 
THE DJijiTS rtDVE! 



IE 



1 
C 



49 



LETIE*3 HOWf? Ctt 

ILLEGAL HUE OR tUt ^HPUT. 

KPUI [BUCBFtt. TIPS Jl FDP HELP. 

LETlESa BOtftr H 

THE LiriERa wa^E IMES LEfl*L nawa: 

4N JtE Bq BE lU C< 

LtTTEira mvEt BH 
TItt aifilTS WUEl IE 



i . 

3 i 



. C 



LETIES9 BOUC fllH 
TK DIGIIS HDUE: 3E 



a 4 



LETIEirS FOVC< Ctf 
THE DIB 1TB HOWi 3H 



A 
i 



LEIIEffi flQUE? AM 
TME Olfilia HaVE: 7S 



A , C 



I B 



THE DiBjrs nnuEi IE 

. A - > 

. 2 . , 
. 3 B , 



LETrCtS rtOVEl lit 
IHE BItnS ilDUE: IE 



LETlERa flOI'ET AN 
THE 11G1TS HEUEl 3E 



2 ■ 



LETTEHS mw AH 
TH£ DIB 118 MWE: IE 



LEriEO HOVE? BH 

ft THE LETTERS Ulfl' M 



LUI 

la PBIMT TftBl24J!"DllIlOEH'' 

?t PimiT TflB<(ai!-ClffATlVE CQ(IP1»T1«" 

30 P*[«T Ilil(14};-JIDRPIBT0WI BBJ JtRBET" 

At PPiBTiPFllHIiPPiNT 



240 

37e 

33C 



mir uABi ittSTfflicTiona fw bqoie*' 



O -T- THEN ?M 



PIUHT -DB 
INPUT 41 
fiOSUB 2?S* 

IP iEnna<,n 

HtSUB 31 jc 

pimr -BaftflD si^e ca-*}-? 
mpar fi 

LET ll':IHTtfit 

IF l4-A>flA-3) J° TIEII JH 

GBTO 2V0 



340 

4*0 
4*0 
470 



LET P<1,l}3M-llL£T P(7,iJt"fl-I 
FOB J*l TC ft-l 
LET PM,Jh = ^J"J*l 

HEII J 

FOa J.l IB *-l 

LET P<3,J>'Hl"fl"J'l 

■EVT J 



LET F-1 

LEI MdJ-^^ES- 

LET mtat'-BE II- 
1V9 LET G1II>--:B1>]T&'' 
S*0 LET CS(2J^-LEnEIS- 
910 LET iHUI = -1231H;" 
SZ4 LET Al(2J'-flKMFG- 
5tt fUlL J-J TO A 
570 [F J't IHEM 430 
3B0 LEI B<<J,I)"CHBI(<B»J] 
310 FBt K>7 Id « 
aOJ LET DKJ,H)--.'* 
iie HEKT V 
AlO eOTO A70 

6ia LEI iittj,ir'-." 

d<a FBP l!'3 TO A 

&» LET ll4J,K>=i;ilttia3tKI 

Ate HEfT t. 

&7(l MIT J 

£fO PR 141 -HBU IMT PUfEIIS U OR 2}'! 

700 JIPBT B 

JTO IF B=a TBEI BOO 

^Z* If B-1 IHEB 7<» 

7JD BOIO 4'e 

7(0 raldl -OH, THE CWffUlER 

7^ ftHT -UdO nOVES flRST 

7« IBPUI F 

770 IF <?-F»>n-F>':0 IHEH BOB 

7BI PfllHT -PLEltSE IlPE I BR 2. HBV,'} 

?t^ WTO 750 

Ptim 

PriBT -HEBf UE ED,.." 

FFUm 

IB A 
Tfl A 



UILL mm THE 
M-GBiriTER, 2 



0101 TS.< 



BIO 

aiA 

350 
B70 



OM 
910 
VdO 



FOR h!»l 
PltlHI ■ 

itEIT K 

nitn 

HEVT J 

FHTITT 

FBI Jf 

frEB 

FEB Jl'1 TO *-l 

LET R=I1HP1J.JI)'HH 



';[iaij,i>: 



3-F 3IEF 3-2"F 



1240 
12*0 

1710 



1240 



IMO LET >PIJ,JI}-H>"fi 
1*20 QB J eOTB 1040,1100 
H40 IF C-ft TBFB IMS 
lOSO EE C > A THEN IQTO 
mH BOIO I1«0 
1070 BOTO 1730 

]*ao eoio 1300 

lieo If 1f-1 THEH 1140 
EIIO IF B=0 THEH 1130 
1120 BBTO >litl 
1130 aOlO 12^10 
■ HO aOIO 1300 
11*0 BEl 

11*3 IF D<fI!-l,tJ="." TUB! 

117* TF D*1B,C»1I"'.' THEI 

USD IF J=7 IHEB 1220 

1190 IF BKI1"1,CJ-V" THEH 

120O EOIO I23l> 

1710 6QTB J300 

1320 IF Brnt^C-n"'.- THEH 

1230 euro 125* 

1740 DOTB 13D0 

1245 FHBT "BBS — 1745-, J) 

17S0 HEJT Jl 

12*0 PIflfll -THE -JCHS-J);- HtfJE 

IJ70 FftLur -THE '■,ct(ii\- uimii 

17B0 SlOP 

1301} IF E-7 THEN 17^0 

1315 IF J'7 THEN 17SQ 

13*0 LET LI '2 

UaO FOB LO-I ID 3 

1370 OH L* QOID 14^0,l3BO,14JO 

r3ei> IF BNB11» < .1 IHEB 1410 

1390 LET Ll"1 

KOe aOID 1410 

1410 LET 11=3 
1470 GOTO 149a 

t430 LEI LI':4-LI 
1450 LET P1-WT(RJIB11}**> 
14*0 FQfr L2-1 TO A-l 
HJO LET PI«PI*I 



HO LEUAL flWEfl FOfl TBE -fltU);'^- 



SO 



!»■> 
MfO 
ISOO 
IJ10 

\U^ 

1630 
U^U 

U^O 
1710 

i7je 

1^50 
17&0 

1?7i> 

iico 

IS1( 

1^11 
1J1J 

IBIS 

iai? 

TB3D 
1G32 
1»4 

1B50 
1BAD 
18^5 

1 
H1C 

1V30 
1T« 
1?50 

1fAD 
1»70 

?{iOQ 

ZD2C 
2l}40 

2*B0 
2(9 H 
2100 
2110 
2140 
2150 
2U0 
3170 
21S0 
2210 
2230 
77 JO 
22 4C 
2?50 
2290 
2290 
2100 
3J1» 
2130 
2340 
23S0 
23&0 

?ieo 

23? 

24^0 
2410 
2(?0 

2440 

2450 
244 D 
24flD 
2490 
2300 
2310 
3^0 
2!^30 
25&(l 
2170 



[F PI <=' A'T THEH 1500 

LET P)»P1-<A-1? 

lET R-lMTCFUnPn/lOJ 

LET C'f(JfPl>-10*»[ 

If t > A TrtE« 1720 

DN LI BOTO >570plft20pli?0 

EF DKIL-I^E)^".* THE» I3f0 

SDTO 1720 

SOTO 2090 

If BliRtCtl)^".^ TttCfl !»• 

IF [:=A THEN 1410 

&0TI3 17?0 

LET P(JpO?-P(JpO^-1 

5GT0 2140 

!f IHR+I^CJ^". " IHEH 17T0 

SDTO 1720 

2230 

L2 

LO 

a2J0 

C4[JN" nOWE-; 



CQTD 

jiEi^r 

NEXT 

QttTp 

rKEflT 

INPJT M 

OOSUB 2?50 

IF LEn>4Al^1)=c'll' THfti 2SA0 

TF LEFT»4A*r1>>*H* THEN 2^40 

LET At-NIBt{illT^2r 

P1=0 

FOR BO-1 TO A-l 

[f N[Dt(A4U}^H^l»-HLI1lA>r»»1h THEH PI^-lO 

HEKT »0 

IF P1=0 rnEtt 2430 

LET f2'0 

fOft toil TO 4 

IF 1!II*tWCJ]TBOr]>>l1lO<lAtp2^n THEit P2-M 

iifrr BO 

IF PS'^O THEif 2430 
IFT fi=THTiP(JpP1>/10) 
LET C'P{J,P1^-10*fi 
if B-0 TbCN ?430 
LP C > A TItEN 24^0 
OK J BOTH 1930, 1??a 
IF C < ii THEN 1f70 
IF ?2 O 2 TJIEH l?70 
LCT Pd^OJ^PnTOl-l 
ODTO iUi 
&DIQ ?040 

rf f > I THEH 2ati> 
TF P2 <> 1 THEH 2540 

LET pc^pO?'P(^pO^-1 

BOTO 30fO 

Dfl P2 eOTQ 207at21"p311l>f22SO 

IF BHR-1ptl=-.' THtfl 2W0 

ODTQ 2430 

LIT DHft-1pCJ"H|Dt<A*(J)pFtp1) 

LET PCJ,Pn=P(JpP1}-llJ 

&0IO 2310 

IF iritRpCfn = ''.'' THEN 2140 

BOTO 24J0 

LET i4CN,Cn> - niDICAiU^PlpD 

LET PtJtPn^PtJpFlJ + l 

SQTD 22M 

IF Dt[Nt1,Cr^'/- THEIt 2230 

BDTD 2430 

LET B4tE^t^[:}=llIBl{Al<J» pPtpl) 

LET PU,PH=P(JjP1KlO 

BOTO 2330 

rF ^t^ll,c-t]^■^'* then 3300 

SDTO 2430 

LET IHC«pC-l?*HIII#(AtiJfpPt^1J 



LET P^J^P1>iP(JpP1)-1 

LET Uitll.CJ''--- 

IF F>2 THEN 2390 

IF J^2 THEif 2380 

Pttl^T '*TriE BIDETS HQUE^ '{MBKAIUItP] , J J; 

PAIflT HlitfnilJrpLUI) 

IF PiJpO) <> THEH 2420 

PRINT 

FRllIT "**+ TJ1E "ECICJN" tflK^i!' 

Etf» 

EDTO 2f 00 

PItlffT "ELLE6AL HOVf BR BAB INPUT,"* 

P*[|HT *iHPUT JSttORED. TT?E tl FOB HELP." 

ODTB 1730 

PRINT -THE ^C4(Jk!" HAVE THESE LE8AL HQKS:- 

FQR JJi^l TO A-1 

LET F0=JfLDtlA1CJ^pJ3,n 

LET (r>[|lT<PiJ,J3)/10J 

LET C^^PU^JU'IO^R 
Olt J GOTD 2S50^2A2l> 
[F C^A J^H 2540 
tf t > A THFH 25B0 
GOTO 2i« 



2580 

2390 

2400 

2420 

2630 

2&40 

2459 

2460 

24^0 

J?00 

2730 

2740 

27? B 

2780 

2?t0 

S^O 

2810 

2S20 

283 B 

2S4D 

2B30 

2860 

2870 

28BO 

2t00 

2f10 

29S0 

2f70 
2t75 
24B0 
2190 

3000 

3010 

3i>20 

J030 

3B40 

3039 

3040 

3070 

3073 

3B73 

J07? 

3BB0 

3099 

3130 

3140 

3IS0 

3160 

3t70 

3180 

3190 

3209 

321 B 

3?20 

3225 

3230 

3235 

3?40 

32^0 

3270 

J2BB 

3299 

3300 

3310 

3320 

3330 

3340 

3350 

3360 

3370 

33S5 
3390 
3313 

34 OO 
34]0 
3420 
3430 
3440 
3430 
34 £0 
3470 
3439 
3490 
3500 
3310 
3520 
3530 



THEK 2730 



^"t 



^" THEH 2770 



T«N 3800 



THEH 2fl30 



""iCiij^;- eiuE unr 

THE "iCi(3-J»!- UIN' 



ElH 



^11} 



>■ 



THEH 3049 
TPtH 3040 



BOTO 2930 

PRINT ■ ';Pt;-E' ; 

DOTB 24T0 

IF R^l IHEN 2460 

IF fi'O TBEK ?65C} 
GOTO 2690 
flOTB 2a30 
GDTB 2700 

IF B*CR-ItC> O "" 

piriHT " -;p*;"N 
IF QIIRpC^W <> 
FffWI " *;P*;-E*j 

IF J=2 THEii M1B 

IF BtlR+1tC> O ". 

PRINT " ";P*;"S"! 

BOrO 2030 

IF D*CR^C-15 O '*- 

FBIHI " '!P*rU-; 

JfEXT Ji 

PRINT 

BOTO I7tl0 

PR 3 NT "THE 

PRIHT ■•" 

EHD 

MEKT J 

£9T0 840 

IF LEH(At}>10 IHEH 3t?0 

LET CliO 

F(»t B0«1 TO LEflfAl) 

LET RCtOxAOClHIil^MpS 

ilEIT SB 

LET R4 0}>L£N4M» 

fOR JZ^I TB A[0» 

IF AlJ2Kfl* IHEH lOTO 

LET A{J23'=R{J2)-32 

IF IS7-»IJ2H»tt4(J2S-4fl) 

IF 49e-li(JZh]t{A(J2»-6^l 

flOlO 3940 

LET CIKttl 

LET H4i:n<4tJl> 

HEIT J2 

LET fi40»-C1 

LET AJ»" 

FOR 10^1 TO li(0) 

LET At»Al4CMR4CACB0n 

NEXT 89 

BETURK 

PR I Hi 

PRIHT -HERE ^3 A SMIPLE PLRTlHG TORRD; 

PRIHT 

PRINT 

PRINT 

PBI#T 

Fvm 

P*II*T 
PftlHT 
PRIHT 

PRINT 

PRIHT 

PRINT 

PRINT 

FBI NT 

PRIHT 

FA I HI 

PRINT 

PRINT 

PRINT 

FBIITT 

PBIHT 

fBIHT 

fRIHT 

PRIHI 

PRINT 

PRIEST 

FBLBT 

PRIHT 

PRIHT 

PRIHT 

PftJHT 

PRIHT 

PRIHI 

PEIHT 

PBIHT 

PRTHT 

?F!THT 

PRIM 

PRIHI 

PRINT 

PRINT 

RETURN 

EHB 



■3 , . . ^^ 

"J . . . .' 

-i . . . .' 

-^ S B C B' 

■Tuo atta Qf PIECES iBieiTs ttim LtrT£(r&> Bftct at ififlHT Wi- 

■LES- 

-dCBDSS A EfiUAKE BOAKE. VHCAJIT LOCAILODS Ht£ SmVn AS Pdtl' 

-QllS.- 

"roil CHOUaC THE THE BOARS SIZE lIHE ONE AMUE 19 SIZE 5.r 

M qH 



U-"£* 



THE 



THE 



OIJECT IS 7Q HOWE ALL OF lOUiT PIFCES ACItD59 
DFF THE OPPOSITE EDW. IllflllS LEAUE THE 

EABlERil EBGI; LETTER? 9HLT AT THE NflPTrtEBH- 



IH BQARO- 
□*ILf AT" 
THE UIPriEK' 



-^5 mC PIAYEA UHD&E PI£I:E3 HAVE ALL LEFT THE SClfiirii.' 

-TIfE PLA^Eira BD IH TUP*, qOVlHC DNE »f THIFT PlECEa TO M" 
-AlTJACEiH LOCATON UHECH 15 EIIiElt aft THE BOAH OF CtftfEWT"! 

■LT" 

-VAl^AHT- THEITE APE HU BIASOIUL MKi, HO JUHPS AflD NO G4PT'; 

■iHtES/' 

-UlEirs GANirilT HOVE VEST. HUFT LETTERS HDI^ SOUTH. - 

■IQ HOIfE A PIECE, TIRE ITS NAlU AVD THE FIRST LETlEP OF T«" 
-BFSIRED mitCCTIDH. E »! APPLES :' 

- it HEAHG THfiT PIECE 1 JAHTS TQ flO EAST" 

- BU HEAilS THAT PIECE 3 UMTS TB 00 U€ST,' 



-HOIE: TOU FDVFET THE SAflE 
-VJTHOVT AHT LEOAL nVVZ^' 



IF rOUIt HUUE LEAVER VQlflT OPPQIIErfl 



■LASIK, TOO flAT TTPE B TO KSIM AHU H FWt HELJ." 



Doors 



RIM 



Inthiscuie limegame, there are four 
doors in successfon and you must 
open them to get the prize behind the 
lasr one. Yoj have a key ring con- 
taining eleven keys numbered zero to 
ten (computer people tiave a ditlerent 
way of numbering things than normal 
people) and you have fourteen tries to 
open all Jour doors. As an added 
hookey some keys may open more 
than one door If at first you don't 
succeed, try, try again. The prizes 
behind the fourth door are well worth 
Ihe patience in trying to get them all 
open- 

Doors was conceived and written by 
Bill Ingram. 



■on? 

tlDflfrlSTDUN^ HEU JERSEf 




TitlTE Ml ^ LOCKtC DODRi AHJ THERE rtftE 11 KtTUt- 10 J 
TSL UILL HUVE 14 TRTES TO CPttt tHEH ALL 



fSDflE KETS 
TRIES LEFT 
rf JES LEFT 
rtlES LEFT 
IHE5 LEFT 
U4 LAft> 
TSIES L£FT 
TR[£3 LEFT 
TRIt& LEFT 
TRUE LEFT 
TRIE^ LEFT 
TRIES LEFT 
TR1C5 LEFT 
TKICS tEFr 
TRIES LEFT 
SURPRISE! 
TRIES LEfl 
YOU LGSEt 
DOOR 3 t.ET e 
pOflh i »:ET 9 
[ifl TOlf Ui^VT 
' TES 5fR' 
THERf AAE 7 
■TDU *irLL «flVE 
CSDHE GETS tti^T 



n^t OFEM ttDRE TilAtJ ONE DOOR} 



13 

t: 

11 

e 



ITQDR 
[tOOR 

DOOR 

DQOR 
UDDP 
UDCHt 

pQJlft 
SUOR 



1 1 

I 1 

I 1 

I 1 

# 2 

1 : 



DQOR 



HET* 
KEY' 

KEt^ 
KET' 

KEY"* 

HEH 
KET'f 
KEY"? 
KEl* 
KETT 
KETl 
KEf 



5 

? 
U 

f 

2 
4 



IKE RE^t DF THE hIETS ARE I 



I 1 



TO PLflt ftflAlttCTES S[R" OR «□ SIRi} 

LOCKCI ttOaftS *Ke there ARI 11 KEtSCfl- T» 1 



f IfilE^ TC DfE# THEtl ALL 
CiPEH fllfRE IHAN OETE ^OOR) 



TRIES LEFT 
TR[ES L?FT I 
ftrRJ^CliDrtJRA' 



H ¥ 



9D0R 

DOOR 



TRIES 
TRIES 
TRIES 

TRIES 
TCIE^ 
T£IE^ 

TflEE 
TiK" LO^Ep 
DDDR 2 KEt 
ITDOU 2 Kit 
DD TOU UAKl 
■7 Nit SIR! 
OK 



LEFT 
LE^T 

LEFT 
LSFt 
LEFT 
LEFT 
LEFT 



[iQOR n 2 



THE REST Of 



DOOR 
DOOR 
DODFl 
DOM 

THE KET3 



KE^* 

KFfT 

HLT-7 
KEI^ 
KET^ 
KET' 
KET^ 
HET-^ 



1 



3 

^ 

3 

> 

10 



ARE I 



10 PIBT AE^IR^YES SIR' OR HO SIR'? 



LIST 



2 

3 

4 

& 

6 

23 

3« 

32 

32 

35 

4e 

41 

4! 

d? 

?{| 



rRHfTTAH?7)-WDBB" 



1A' 
Ti 



I [ 20 ? "CRE AT T VE CDflP If T 1^0" 

IMB?'*l1Df^RISTDUNr P^U JtRSE'T* 



FRLffI 
ffimi 
FRINI 
miHT 
PRIHT 

Bin K(2(t 

BEF-FflR<I]-liin;*airDn]} 

FOR K>0 TO A±READ 1t»(XJiHEKT X 

FOR X<C TO A; READ Sia3:^Eri X 

^I±1-r■^B4FHR[2n:l^^l^f*#R^31;K3■B■+f[lfiO^ 

PRE^T-THERE AWVII;-iflCKE» &0Oft5 AHl^ TJiEAE flRE-K3;»'KEt510-"K3 V 

MIKT"m UILL HAVE *JT-T;"IPIES TO DPEH TttEH ULi" 

PRIHT-CSBBE i:ETS HflT OPE« hQRt IHAH QHE »DOR>" 

FOB H^: TD HtKa?^rNMK3J:BEST K 

T^T-lclf T^O TIfEH tJO 

PRIIfT-TflEtS LEFT r;T;" BDOH rjDrKEr^ 

INPUT K2 

IF EJOILCDJ THEH ?0 

PRINT 5i<FNR[7}r:D>D+-1 

Tf Ir^N-tl THEN 70 

?BE4t1 

FRIHt-fOU HID 3Tt BEHJflD BQftR r;Ri"lS *h*.^^ 

PRINT R*[fttR<?J> 'iL^iUDTO E?l} 

PHIHT-IOU LOSE, THE REST HF THE KETS flSE:" 

Fftfl X»D M N:PRINT"DDBR"iSirKET"KtK5iNE;cT K 

fftJifT-DQ rOU UANT TD PLAT AflAI^ETEii Sltt Ofi HD SIR'J 

IHPJl Df 

rF Dt = MES SIK^" THEN 35 

IF Q*"^«[) SlC^- THEN ?9^ 

PHlHT-«ET^ I DlflH"-! JUST FALL OFF ft TI|R«1P TRUdfn Yfi l[NOUi!'F^* 



1«C 
110 

1^0 
Mi 
130 
HO 

tso 

1?0 

1?t 

1>0 

lil 

lit 

2 DO 
5D& 
5S5 



fiCTO 
DATA' 
DATA 
DJ4TA 
HATA 
END 



1?0 
li POT 



OP liDLB%*fi BEAUTIFUL ftAlBEFt'i^fi HAH EATIHB TIBER" 
M0THMG%-12Z-5?"\-A RBLL5 fll>iC£^-THE KElS It THE UDRLD*' 
DPEN 5ESAHE-","C-R-E-E-E-E-E-A-A-Ki"p-Ufl Ult5-p"TA'BAK'" 
ABICfiCADABKAJ".-£LlCK e'T-^"" t " ■ Ml M^^■5URPRISE" 



S2 



Drag 



DRAG allows the user to design his 
own dragster and then race it agai nst a 

dragsler designed by another player or 
me computer Yoj musi specify the 

horsepower, rear and ralio, lire width, 
and lire diameter. Therearenolimitslo 
Ihese parameters. 

Aha! you say. "Tlf just design a two 
million horsepower dragsler!" Bui it 
doesn'l work that way, because your 
mass is related to your engine size, and 
30 you usually end up with a lop speed 
of something like 33 MPH. The com- 
puler is extremely hard to beat but It's 
rumored thai it can be done Note: on 
some systems the amounl of time 
between printouts can be aggravating- 
ly long. 

This program came from the 
Hewlett-PackartI User Library. It aEso 
appeared in Creative Computing, 
Jan/Feb 1977. 






UDUi-D JttU L!t:E THE a^STeuCIIOtfS ^ T£S 

VOU hftl RACE ftGfi'N^T- CHf IJF TflUp FRIENHS UR fW \^Y SftC? 

rtssiftsi hi" iififl5s:Eir. rgy gij.L be ftSKEH ra D^sitiN youb 

OiJri HftCJfjN^H SPECIfrittU HOURS£POHES, GEfiH twp HfttlD iX;\}, 
TIRt UIDTH 3Jf LHCHI& j^ND TIHE DtlihETER Ift FEET. 
50 TOU HANT TD RflCt ^CAIHST ?1£ ^ Ti;S 

I l?ILL lirt^E EftR t1. , 

DESIGN CAR t2: 
H0fi5EpfltfES:^' 7?i: 
R&AR ejtii JTflTia^? ^,S 
TERE UIIiTH=? 22 

lERE IIIfttl£T"£R«^ q 



RLi« 



CQ! 



eirtPSED 


C|:4lt til 


^I^R 12 


rifii 


SFiEU 


&E37ANCE SfEEB 


EUSTAftCE 


CSED] 


CflfH) 


IFT> IhPfl] 


^^} 


CAR « 


1 5TDPS 


BURNING RUEEER 




i 


2^.0707 


li.JH^I L7.5767 


H.Ji?^ 


2 


^J.3?TI5 


iflH?g34 3T.9J?2 


39,1071 


J 


^q^floij 


M-3^?g2 6U.34IJ5 


i^E^e^^ 


4 


S2.9Z?4 


235.^^9 J^.e1a^ 


531.^*.* 


9 


li?q^HI7 


i^fi^iig ??,^-?5^ 


365*321 


fr 


lis. 35^ 


5^J,05i H2^3i: 


?E^*i07 


CAFr n 


1 ^TQ!^ 


HUfiHii^lj ffUB^ER 




? 


133.65? 


7:i,3?? 13^^3e? 


li?3.6J4 


ff 


139-166 


?2>.15S 3J0.532 


se3.:2*7 


9 


14d,??2 


1 131. Z4 14ii.32i 


ifta^.fl.? 


f.34047 Ethi.^ic ]3;^« a^^^^ij^ 


E2i4H3S 




uriiflEJr 




DD TDt 


1 tfrtrtt TO 


TRT AGAIV f NO 




ot 









r' 



LTST 

3 fRI»tr TrtBC2??;"EiRAG" 

3 fRlifT" Ti=iBL2fl^:"Cfi£PiTl'J£ CGnPsj^lNG- 

? ^Rlflt ri^flri^hJ-MaHRI&TflUH NElf JERSET" 

in DIJ4 P[2^El2^U^:^5E^^i^2^rtL2)pC(2^B^2?Hr^^? 

2fl mJt 9[2^ 

3D Pf:iKTtPRIHT[PRENT 

35 PfiINT 'EJELCQHE Tf Dftftfi STRIP." 

^fl FKIKI -yiUJLD TOU LHE EKE I^^STRUCTIO^S V 

ii Ef EJ^^^tt** THEN 15D 

7D PJIINT -TOE] HAY fiftt:^ rtSftlHST QhE OF TCUJr FFrJ£[fW OP ^ffU fli^T R^E" 

SD PEINI -AljfllNSr AT DRi^fl5TtR- IBU WILL BE flSKED TD DESIGN ?CUR" 

PfilHT -&U« H^CMIffEi 3FECIFTINB HflURSEPflUER, REflE^ EHS ftATlt5 iX:1^, 
= RIi^^ "TIFLE UIHTH IN ENCHfS AnH TlJlE D[SPETER Iti FE^T," 
] rHU VANT T[? i^ftCE AfAliT^T n& ": 



9Q 

lUU 

11D 

12D 

13D 

MD 

13i> 

140 

17D 

Ifti? 

190 

200 

210 

230 

230 

;}40 

250 
260 

;?o 

260 
2?0 
300 
310 
320 
iS^ 
J^O 
350 
340 
37C 
3S0 
3?0 
400 
410 
42(1 
430 
411^ 
450 
44 D 
^711 
4^0 
490 

in 

51i> 
31l> 
330 
?^0 
550 
SdO 
370 
rifro 
5^0 
iiJO 
410 
420 
430 
4i40 
450 
460 
4'0 

4ao 

4?0 

;ao 



FREJIT 

INPUT IT 

IF Ii="Na- THftf 200 

PfilMF ■'[ uriL KA^ CAR 

P(U'4I>0 

OM^^J.? 

tDTlf 2?0 

PR3HT -aFSlhN tAH HI;" 

"Hlll^R$P1)ytFI = ^'; 

fCU 

"ft£Aft £JJD PATID = " 

£U? 

"TIRE UEEFTH=-; 

UM) 

■^TIRE IiIftrtETEft="; 

DU] 

■^HESTGPf ^ftR tl22" 

^H[!R3EfDUEfi="; 

Pt2^ 

-fifflR E«P RAT 10 = - 

'TERE UIEiTK="; 

kJ42] 

■^TEFie OlAPtETCft-'-f 

EH2] 



tfl 



^REHT 

INPl^T 

PRIHT 

£NPlf! 

PRIttT 

ENPlrl 

PRIIfl 

[NfUT 

PRI^?T 

PRIHT 

INfUT 

PfilrtT 

Irt^^-UT 

PRINT 

3rtfUT 

PfiINT 

IHI'UT 

PfiINT 

PfiINT -GQi" 

E1=50O 

K2=l.i 

fc3^2 

K4=4£-04 

y5ti£-a5 

?S=.2 

K7=4 

DCr3^0:a^2]^0 

BCIJ^0:£423^0 

XfP]iO:K(2]*0 

EiEM: M TS MASS 

FOR J^l ri3 ? 

ft^JJ=it^F+tt2-*P(J?*J[J*UU?*D(J]tK7*iifJr2l/32.2 

FTtn: C E3 Di^TAG FRQH ItEMD. 

CUJt|:4*fl[Jl ■^2/3t+-K&*WU^*IiU5 

ktni S EJ TH£ AAJ: ACCEE-ERATiqN VITHQUT HURil^NO 

scJ^^l!1■38*vcJ^^IlrJ]yc<uu?*6i 

ftEMf T ES THE 5C-1LE FACTOH FE^R 

TCJI^3.7-J.lE-fl3*PCJh 

IfEi^T J 

I^Rl^E 

PRIHT 

PRiJiT "EiAPSEii ■^;Tftacs3:;"i:Aft ^l^;Tfl&^3■9J:"Cfle 

PRMT "rjtt£ SPttD BI&]ftM:E SPEED 

PREttT "(SEC] IHPHJ EFTJ ^flPHJ 

PREilT 

FDR T^U TU 100 

FOR Ti = | TO iCfl 

FDR J^l TO 2 

frEMi s: E5 R?H- 



ftPil VS PftUES. 



*2^ 

Iil5TflH[:E' 
CfT>" 
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^20 e^H: LD 1% EWUlftE T(llTI]UE. 



??5 



SIC 

ail} 



B9i? 
9l>0 

?to 

?^|? 
950 

??P 
9BD 

1i}0l> 

10]5 
11320 

1«1l 

11370 
1QG0 
1D?U 
HOD 

mo 

1120 

1t35 
1130 

IHU 
11^0 

11&(l 

IT JO 
1171 

IJ^O 
12D0 



It 




EURHIilO EUJfiBliiC 



REHi LI (B TDRttUE fftttt fRlCIfO*!^ 

Ll^PlJf*(Kitfi+Ki? 

RENT fi2 IE REftR *iKl_£ TORflUf: . 

FrEtl: F IS FClRCE ON J^MD 

REH: UST FOR BIRH, 

[f F > M(J]»B[.|f THEN SBO 

SEMi fl-flCCELERATIBrf 

IF OCJJ O THErt BiO 

PRINT -CAft H';j;" srnPiD 

QU3=t 

A^CF-ClJf*SCJr2?/|5(-r5 

IjiMfl fDd 

fl=BLJJ-i:CJ?*SUr2/HU? 

FtE*ls S IS FtET l« fr^BEC. 

BCJ3=5UI+-flt--fll 

RtU; K IB Irl3T|y«liE It^ FT. 

fle^T J 

REtt: TEST KDS FIWJEH. 

If 3:riK52aO/^ and SC5K523Dy4 

IF XnJ>:C(2? THEN ! 

T3"ai21-5?3U/<5.'Bi2> 

T=TfTl/10l}-T3 

x^^?■5^90M 

XnJ=X(0-S(t>*T3 



TIHE3. 



■;Stn*3ioo/5Z0o;" "jkcd 



^[2J:tJ4flO/52aO;" 
TfcB(lO];-U[*IB&Jf^ 



YOU 



AGATN 



ffTTNT 

PRINT 

PfllilT 

PFUKT 

rItttiT 

IHPl*T 

IF [i* 

END 

Tif+E1/1DC-TJ 

;cn^^52E0^^ 

X^25^KC2]-5[Jf*T3 

FfifNT t;" "|5nj*JiOU/:ra8i?l^ 

PliJtfT 5l25^3JiJii/5JeD;** ",f.i2l 

PRi*IT TABUfl^"UIHNER 

PRINT 

IjDTQ t1]40 

NEXT Tl 

fRIfJT T + 1;" ";SC1?:*3i05J5IflD;" 

PRINT &L2]*j£C][)/a2Si>;" ";J4(2^ 

ntil T 

EMB 



■;>[(1?; 



";xu3i 
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Dr.Z 



"i 



Using DR.Z your computer "m- 
teracrs"withyouliirrueRogeriariforrnH 
never making a valuejudgrnentof your 

response 

DR.Z IS muiti-lingual and 
^■professional confidence" Is 
guaranteed, especially with a video 
display terminal. However, if you have 
a printer, fry employing a unique 
language known only to you and Dr.Z. 

If you wfould prefer to employ DR.Z In 
an educational mode, you might con- 
aider the following sequence of ac- 
tivilies. 

1. DISCUSS con3mjnlcation, exploring: 
a. The role of spoken language 

h. The role of written language 
c. Non-verbal language 

1. facial expressions 

2- posture of body 

3, hand gestures 

2. Experience a session with DR.Z. 

3. Develop compuieri^giions of oLher 
"purely human" situations. 

Note' Don't mistake DR.Z for Eliza 

[or Doctor). In DR.Z, all the responses 

are "canned" and the computer makes 

noattempttoanalyzeyourinpulinany 
way 

DR.Z was submiTled to us 
anonymously by some students of Dr 
Melvin Zeddies of San Dieqo. 

tvEATjiJc conruiiNE 

HORRrSTUJV, riEU JE(L&£I 



uiflT TS mk Mtii m nii nt sonrMiBG «oiit voifSBELr. 

mi^LR. BON-T TTPf MO»E llia« m LJHE. 1 TTRE tftSIK. 

' tlV NAME IS SIEVE. I'rt TITTlHe TO flX THH PflSGRAH, 

WHAT OLD IDU SAI IQltf HAriE ITilS itt^lHT 

' STCUE 

WffJ BD lOU FEEL TOBflYt 

■> TEWtllLE, ]T ^S rSD hJOT OWUHlIf 



oc roir TH|(|« TI1I5 is tEAKonnfiLE m light of raitn tuteptesis? 
'' UHAt lUtE 1DEI rallllMfl ttSfUT 

DD TflUP FUZEHS f KfB THIS ACCEPT ilBLE? 
' aOhElillES 

irm Llf mi TrfllfH TQU FEEL THIS UTT 
T BECAUSE OF THE VEHINEfi 

SO »m rmjiFr iiiflr this ig a noitniL ffFLKw? 
' YES 

DO 'TOUR FfllCAD^ Finn 11173 AHCPTitn-E' 



1 EREAT 

VO llEtl 



DIM 



I milli: IDU AVE HAKIIU 

DJfFTCUlTrES, *ll!i T SEE 

5fB&lD« bH< fUPTMEB, 

STEVf UOUL^ mu fliBlE »nOTHEir 

FDfi SBIIETinF IH tut rtlT FEU 

PfiEFEt' 

T ««R 

IHAI Uia ?E Fl« . 

1-VE EBJflrEB CUfALVJCATlna UITH 

HliVE A VICE BAE. 



ATIEHPT TO SOLVE rOUG 

TB nKTiifUE mis 



APFO;NTiEHT 
UEETLS. UHlIT 



rnu. 



UlTM 



HI CDItPUTER 
VCULD IBlf 



LUT 



5 tRZir 1ABI571 ;■&».!■ 
d fRrBT rJlkllBlE'CirEATTUF CGHPlTTIirG' 
7 fRIBI TABMiJ ;-(HJPfll3TailN, flEJ JERSEf 
Q fHChlEPtTirTEPttl'T 
2t ^tTIIT -liriLO THEfE, 
PfrlHl ■UHAT IS TOUK 

nrmT ■uduevei', Bon 

JVPHT fil 

Km? -MAT All IDU SA1 TeUft MII9E IIA^ kUtUt' 

INPBT II 

rir»T ■bou H TQir feel 

LET ir-aiU>fr|i-0 



3D 

AC 
JO 

et 

IH 

II* 

120 
FID 

tso 

1*0 
173 
1BD 

3?0 
4» 
110 

43C 
440 
430 



I'd rOQR CHl'irTER THERAPIST, ■ 
IfftM? AND TELL HE SDIIETNIH» ABOUT 
T JtH HOtF THH' OHE LlliE. | TL(£ 



TDBITT- 



TDURSELF,- 
EASILT.- 



IDU THIHK rjlIS IS ttlSailABLE Lrt LI6hT OF TOiR WTFRESTg*^ 



1M 
^00 

339 
940 
SJO 

^40 
570 
SCO 

sto 

690 

619 

670 

639 

6<9 

ASH 

6tf 

670 

6t9 

^99 

?I9 

^■29 

?3P 

?4CI 

^-50 

7*0 

770 

7»0 

?fl9 

BDD 

BlU 

G?(l 

S3C 

S10 

eao 



[■rut At 
Piriifi 

ir C-lfl THER 721 
LET I'llfUfDrtKIClJ* 

If El-Z THEO 140 

tr w-r THEir its 

LET H-Z 

9H Z»1 BOTH *tt,«0,4»,*ai, 510. 541, a JO, 600, 630,460 

PHUT -TMST'S OEKT rNTERESllflB, TELL HE MORE.' 
HHHT 

&0T0 6¥9 

PfilRT -HArt III! FStT TVIfi U*T lOflBT" 

PRTin 

flOie tfO 

PRTwr "BD 

Hint 

PkJifJ -BO TOBC FBiERBS FIITI THIS ACt£PTABl£f 
htlUT 

GOTO e¥9 

FRIHT 
"INT 
OQTD 6V0 

PmifT -ED tOl TN1*K THAT THIS 15 « hOlfflW. FEELlrfO''" 

rK I it I 

BDTO 6«9 

p*!iiT -ifiiT nj rou Tsmi rcu feel this hatt- 

PRJiir 

GOTO *f9 

PSIBT -HfllfC Tau TdHEl 70 A«TOHf AIOUI IMTSf 

rriNT 

BflTQ 6M 

PHUT -Ldl ACE lOll HEBE?- 

PimiT 

GUTtl tft 

PSIHT -WE TOd liTISflEJ If ITU THE UAf TOUB JBEAB WE DEtElDPi NOT- 
LET CT'I 
LET U-I 

QOTD 190 



iiDU FEEL COtfHtTAILE II I Ed 7hIS fEELIJllJT- 



Plfllfl 
PRllrT 

PHIHT 

rflilT 
PPThT 
FSTNI 
LUFIJT 

"m 

PFlJtft 

pqiHt 

FDR Ti 

PRIHT 
NUT T 
EITB 



SBE4T liTTENPI TO SQUE lOIJfi- 
M NEEl TD COrCTIHOE THIS' 



-I THINr lOU ARE DfiVIVO 

■ClfFlCUiTrES, MQ I SZE 
-SESSION AhT FlfHHEP.- 

fllj- HOIfLD lOL' MlE Alf[irME>! 0*Pfl[NT|lE«T UITH PT CtftPUTEIT' 

-fD» ^OKET^nE m IliE JftSt FEN H&tKS- UHflT BSTE UQIJLD TOO- 
'PltEfEP" 

-IHilT UIJ.L K fUtE ,- 

■|'I;E EHJQTE& COflNWUCATIIIQ UTT« YOU." 

-M\fl a JllCf HAI." 

1 TO 6 
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Eliza 



Description: ELIZA is a program Ihal 
accepts nalural English as mpul and 
carries on a reaspnabiv coherent 
conversation based on Ihe psvchoana- 
lytic TecTiniques of Carl Rogers Vou will 
have to forgive ELIZA for being a poor 
Engltsh student- You'llfindthal II 15 best 
notto use punctuation in yourinputrand 
you'll havetocarrylheconv^rsalion. Bui 
it does work I 

How it worl<s: In order xo si>eak lo you. 
ELIZA musl: 0) get a string irom the 
userr and prepare it for lurther 
prooessing: (2) find the keywords in Ihe 
inpul string- (3) if a keyword is found, 
take the part of the string following the 
keywordsnd 'iranslale allthe personal 
pronouns and verbs ('T' becomes 
' YOU ■. "ARE" becomes "AM" etc.); (4) 
finally, look up an appropriate repfybas&d 
on The keyviflDrd which was found, pnnl it 

and. if necessary. Ihe "iranslated" 
siring ELIZA uses four types of program 
data 10 accomplish this. 
{^]36 keyword, such as 1 AM' . ^'WHY 
DONT you; and "COMPUTER . The 
keywords must be in order of priority, so 
ELIZA will key on VOU ARE' before 

"VOU", 

(2) 1 2 strings used for the transfatlon or 
conjugation process These are m pStrs 
such that if one member of the pair es 

found, the other is substituted for it- 
Examples -V". YOU-', - AM"r "ARE". 

etc- 

{3\ 112 reply airings The stnnys are 
arranged m groups corresponding toibe 
keywords- There is no fired number of 
different replies lor each kevword 
Repliesendingina'""''arelobBfollowed 
by the translated string, while the 
strings endmg in normal punctuation 
are lo be printed alone 

(4) Numerical data to determine which 
replies to prim for each keyword ^ for 
each keyword there is a pair of numbers 
signifying(£lartof reply strings, number 
of reply strings)- Thus the fifth pair of 
number (1 0^4^ means Ihsl the repMefi 
for the fifth keyword (I DONr J start 
with t he te nth repl y Stri n g, a nd Ih a| t he r e 
are four replies- 

Detailed Explanation: 
Lin^s lO-fGO: Inilializalton. Arrays and 
strings are dimensioned Nl, N2. and 
N3, which represent the number of 
fceywords, number of translation strings. 
snd number of replies respectively, are 
defined- Then the arrays are filled- 
S(keyword number) is the ordinal 
number of the start of the reply strmgB 
foragiverikeywordrRikeyword number) 



IS the actual reply to be used nej^t, and 

N(keyword number) is the last reply for 
that keyword- Fjnally an introduction hS 
print ed- 

Lfn&s}70'255 User mput section This 
part of the program gets a slrmg f rom Ihe 
user places a space at the siart o( the 
Slrmg and two at the end [to make It 
easier to correctly locate keywords and 
lo prevenisubscripling out of bounds), 
throws out all the apostrophes {so DONT 
and DON T are equiualentK and stops if 
the word SHUT is found in the input 
siring (which it lakes to mean SHUT U PK 
ELIZA also checks for repetutve input by 

the user- 

Lfnes 2G0-37O: Keyword -finding sec- 

tion- ELIZA scans the mpul string for 
keywords and saves the keyword of 
highest priority temporarily in S. T, and 
FS If no keyword IS found, the keyword 
defaulls lo number 36. NOKEYFOUND 
(which causes ELIZA to say something 
noncommnal) and it skips the next 

section. 

Lines 380-555- Translation or Conjuga- 
tion section The part of the tnput string 
following the keyword is saved- Then 
pairsof translation strings, as described 
above, are read and upon the occurence 
of one of these strings, the other is 
substituted for it When this is done 
ELIZA makes sure there is only one 
leading space m the translated string. 
Lfn&s 550-640- Reply printing section- 
Using R(keyword number}, Sf keyword 
number), and Njkeyword number), the 
correct reply iS located. The pointer for 
Ihe nei<t reply is bumped and reset \i It Is 

too large. If the reply string ends ma 

it IS printed with tbe translated string^ 
otherwise il is printed alone- The 
previously antered input string is saved 
to permit checking for repelelive input. 
and then ELIZAgoes back for more input. 



Limitations. Rung in T6Kof memory- 
Mo dificationsi You can easily add, 
change, or delete any of the keywords, 
translation words, or replies Bemfiiri- 
ber.you will also havetochangeNl.N2, 
N3r and/on he numerical data. Just as a 
suggestion, if you decide to insert ''ME" 
and "YOU" in the translation string list, 
pul a nonprinling (control) character In 
YOU to prevent EUZA from substi- 
tuting UYOU-iME. Thi5 meansthal YOU 
will always be assumedto be the subiect 
of averbr never the ob|ecl. but resolving 
that difficulty is a whole different 
problem- 

A Few Comments: The structures 
found in lines 1Z0. 420. and 590 could 
he replaced by RESTORE WNNN 
statements if your BASIC haslhem. The 
use of an INSTR. SEARCH, or POS 
function to determine if one string is a 
substring of another would probably 
speed things up considerably [it takes 
ELIZA around 10 seconds to think ol a 
reply >- 

What If all means: we II leave to you. 
Although this program is an inferior 
Imttalioncf the original, it does work. Ili5 

pretty ferletched to believe that a 
psycholanalysl is nothing bui a sentence- 
I n pul -key wo rd - li nder-con| ug ator -reply 
hnder. but il you really rhink so. you can 
buy your computer a speech -recognition 
unit, a Computalker and a green couch, 
and charge 57S/hrl My computer, the 
doctor I 

Ge neology^ ELIZA was originally 

programmed in LISP by Joseph Weuen- 
baum at MIT. If was converted to BASIC 
by Jeff Shrager and further modified to 
work in Microsoft BASIC by Steve Norlhx 
who also wrote these noles- 



R(X).S(XJ.M(X) 

1$ 

K3 

C5 

F5 

HS,S& 

P* 

ZS 

M1 

N2 

N3 

K 

SJ 

XX 



See Text 

Input string 

Keyword string 

Translated or conjugated siring 

Reply strmg, also used lo save KS in scanning for keywon 

Strsngs used in con|ugalion process 

Previous input string 

Scratch (used for simulalmg RESTORE Nh^NN statement) 

Number of keywords 

Mumher ol conjugaticn strings 

Number of replies 

Keyword number 

Used to save K and L when scanning for keyword 

XX Scratch- X is generally used for looping while 

L loused for scanning through strings 

V Used for scanning lor keyword string 
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ELIZft 
RDEftlUOUHp n£U JERSEY 



Hir l-^fl ELIZA. UWAT-'S YBLifl PR&BLEft? 

1 toil 

UE tf&BE BlSCUS^Ii^li TDEF- IDT HE, 

T BUT tOL flT« THE fflOBLEtl 

GHt I AIR THE 4^frQELEh 

^ SD I niSSPELLED ft UDHe 

t NO m ^OU 

Y3ll'PE NOT ftF^AUT TflLHtflS flSDUT HE, ME Tffl]? 

^ ^fJLf ?EHl«ii TCJUH BflCK 

liir ARE ™u COrfCEftHEB ABOUT *li ftflCK 

-? BECAUSE I""** AFRAIB TO COH FHONf ^^U 

Bill TOU COHE TO tt£ (ECftUSE TOU flfiE ftffiflHl TO CBN KftOKT i 

7 YQU BPEAK UIEHD EN^ tSK 

UE HERE DlBCLIHJnG TOU— ftUf HE. 

■^ Aft I QUllriG Trtt S£ST OF TfflJ 

13Ht I 

■7 UttflT IS THft-f gUPraSED TO HEM 

UUT Bfl TOU i^SKT 

T ElfiT tJOT 

UHT na fau askt 

T I flgKEl FIRST 

UlAT HOES tHAT 3Ui30E5T 10 TOU^ 

T THAT ^OU APt ttOT A3 SflSHT rtS TOEI TH|it« 

UHAi IWHE9 ^OB THiNi: I rtH HOT flS fi«fUlT flS I tHHK 

» TQU ARE nft«l«G ft fflOL OUT OF lOORSEt-f 

[iDEa n fieASE TOU TD believe T ah HAXlltO A FQOL OUT OF fOUHSELF 

■^ nOrt'T TlilfiT THE UDflBS OH K lUDBT 

I SC£^ 

^ IHJ TQU ffiflU-V 

TCH^'fiE HOT FEftLLT TflLKIHC ABDJT "E r ARE TOUT 

? YE3 

AE£ TQU SURE 7 

T Its I AM SUftE 

DIB rau CDHE 10 HE BEt:AJ3t lllU ARE SUflE 

T 1 CAHF BECAUSE I AH 

MBU ^OHG HAVE ^OO BEEM 

T A3 LQflQ flS POSSIBLE 

I'tl HOT SURE ] UtBEftSTAHD YQU FULLY. 

? SO I AH HOT TK£ tt[iE';TtST COHVEffSflTlOHALlST 

[HI TdJ BELIEVE It IS NQRHIiL !& BE NflT T« GKIiTEST CatWERfiflTIMflLlST 

' tES 
I SEE. 

? HOU CAW VDU SEE UlTHDUT AflY EYES 

DIH^T fOU fiELIfUC THAT I CAH SEE UITHUUT iIHT ETES 

? HO SD FRCVE IT 

AGE YOU SAVING HO J1I9T TO BE HEfiATlVC? 

? ABSOLUTELT EiUT 

t^]! ARE ^EIHG A HIT HEOMlVf. 

'7 SQ >0U U^r TO FIOKT IM TQU 

LIE HtRt 1IJSCIJS5I*G fOO- ilOT Ht. 

^ CM-^T BACK HIM FfllEE^D 

UHT Bff TOU BITIHO UP TJIE T1?PIC DF FEIEHQat 

? I BOH T HftVE AHT FRIEHDJ 

BQH^T TOU RE ALL "^ UAiJE AMY FRIEHDS 

? HO HQT NEALL7 

UUT MOT^ 

^ BECAUSE I AH THI AM VOU ARE HE AHD UE MRE ALL TOOETHER 

PERHAPS TOU UflULU LUCE TO BE TDJ AHB U£ AH ALE. TOQEItitR 

^ SAT MAT 

BOES TtlAT OOESTIOH 1HTERE>T TOUT 

1 OEFlHlTEtT 

COHE JIOHE ELUCIDATE TOUR iHOiJOHTS, 

1 BO van LIKE 1\W. BEATLES 

OH, I E.JI!E THE ^ATLES 

7 HOU AB007 TIC BEACH BOYS 

tmr BQ tUU ASK 7 

1 DH TDU Dft^AH OF TEH 

"VBU-^RE WJT fiEALLT TALKIHO ABOUT lEp AW TOUT 

7 ORtAH OH 

UHAT ZtQES THAT DREAA SJ«3E$T TO VflU? 

? [MAT DAEAH 

uhilt ahsuer uuuld please rw the host? 

1 DD TDU SUBSGRISE TO CREATI'^ CQHPUTlHO 

UE UEfcE DISCLI^SIHO tOU-- HOI HE^ 

7 J Afl AH Ifin J/Q/^AS 

m TDD EHJOT BEIW AH T^fl 370/1&S 

7 I Ah LHSRIEB Affllit THE MPlPETITIOfl 

BLD TOU COHE TO HE BECA05E TOU AITE UORRJEB ABOUT THE CeHFETniOH 

? DHH^T get FER3i]HAL 

OJlH TOU FLABOAATE OH INAT* 

' I'H OETTIHIj TfHEB GF LlSTEHJFfft TO iGO TO SHUT UP 

SHUT UP>.« 

Ob 




1 fRIHT rABll^A^r^'ELTZA' 

2 PRINT TflB(Zfl?l"CflErtTli;E CflUPUT 1 HG*" 

3 ppiwr TiiEUflJ;"MflRfiI3TailHj Hfg JER^EY' 
A PRIHTiPRIHTtPRLHT 

Qi CEP IHITIALIIHTIDH 

1« BLH SC3&)tR<3£»pHCJ£3 

HI-3^:Et2=14:HJ = tt2 

FUR H-l TO flUH2*W;REflB ZtiHEXT XiHEH SAHE AS KSTDRE 

FORE^I TO Vl 

R£n:» S<ifpLlB|j;k=SCJ(J:H(II*5iI>t^L-1 

HEXT K 

PftlHT "ttli TH ELIZA- UHAT^S TDUB PfiDlLEfl'* 

EEH 

REH USEft HfPOT SECTIOH 

HEH 

IHPUT 11 

It"* "*It+- * 

JLEh BET BIO Of APOSTRDPWS 

FGR L-l TO LEilUI» 

IFHIII*nt,L,1 ) = '"-THEHI»:^EFTi ai ,l-n-*RIGtrTi{H pLEN C H 5 -L ? lOUTQ J 

IFLi'^i=LEJI(ltJTllEHIFilJIita4,L,45^'-aHUr"TttEHfHlHr-SHUT UP--,'':EHD 

HEXT L 

IF U=V% THEH PEIHT '^Pe.EAfif BBH-^T REPEAT rQURSELF^^zODTD 179 

ftEH 

REH FlilB KETUORD LH li 



ITS 
120 
130 

1» 
UCI 
1Z0 
IflO 
190 
2C0 
241 
210 

2S5 
2^ 

270 



B7 



2^ ffEtt 

Hl> BESTMC 

2T3 S-0 

300 FOft K^l Tl fli 

315 IF S>0 THEH3SS 

32l> FCB L=1 TO LEilCIt3-LeNCKl>*1 

340 IF HlHU*|LpLEIHKI]}*H»THEilS^:T"=L:F*=K* 

350 NEKT L 

3^0 NEKl i: 

345 If S>{| TH£*i lL*S:L=T:fiOTaJ90 

3/0 i:i3*:GQIB57Q:REH U€ I»ID+J"T flHB AN1 HE^UDHIlS 

3Bi) ITEM 

3?0 REII TliKE EIGHT PftllT QF STEiriG flWIt CONJUGftTE IT 

^UO HEfl ^SIHQ THE LIST OF STfllflQB TO IE SUrtPfEIJ 

^10 RE*t 

^:0 Rt&TBftllfflCK-l TQ MI:READ 2H«tllT icRErt SKJP flUtft tt£|UORDS 

43CI ei = " '■ffilGHTI{MpLEilCI*?-L£B<Fi>-L+-1h*" " 

44D FOE X=1 TQ N2^2 

4S0 flEAa St^Rf 

4W FDR L' 1 TO LMCCtl 

^70 IF L+LEHi&tJ>LE*ICCt] THES* 5lO 

4SC IF MIB*CC»pLpLE«[3l>K>S1 THE« 510 

4tci cl^L£FT^(c^pL-l>*R^*RIa^+Tt^^:lpLEN^c^?-L-L&t^SJ>+l^ 

«3 L = L-^L£H^Rt} 

510 IF ltUlr^tt]>LCH(U^IHEtf;4l> 

520 IF hI&*[Clp5-pLEN{N*J K>iH THEEi 5« 

SjO Cix-LEFTHCtjL-n^SI*niCHT*(CiTLErt(C»)H-L£WlR4J-+i3 

515 LiL-^U(t<S>] 

54C N£HT L 

^5{i KEIT I 

5^3 IF RIETt^CiiZ^n-" '*THEtJC5-ftI6HTtlC1tLeiHC*(-ll:BE*t OMlt 1 SPACE 

35i FOR L = l TO LE*I{C*J 

55? IF NIB*iC1pLp1>""l^ TftElt C*=LEf Tl [C»,L-T JrtHCHTtlCltLtH (C» J-U :B0Ta5 5^ 

5ie NEI^TL 

540 R£l« 

liJO ftth NflU IfSJNQ THE KE'fQSRI^ HJUBEB iKt OM REPLY 

5S0 ffEil 

5?0 RESTflftE:FOR S:= I TO *tHH2:REfl!l ZIiHEJT K 

iOO fORIniTOEtKufiEAB FttHEXT IjAEM RErtO PIBhT REPLI 

ilO RCX?=R<K]Mt IFft[K^>«C»:? THEN ftUl-SiHJ 

i20 If fi[GrtT*CFtp1K>"t^' rHElt PftI«T FtiPfI»:GOTa 170 

i30 PfllilT LEFTl[flpL£JHF*]-]hfCt 

^10 F»=It:Gl]TD 1^0 

1{]0O REfl 

IJIQ REN J^HOOffirt MTft FOLLflUa 

1i>20 BEN 

1030 REH KEfBRSS 

Mf^^ flEN 

lOBU [fATA "CftH TOD", -CM I'TTQU j^Rf-, "TOUHE" p "I OatT",*! FEft" 

1040 fffiTA -»ifi"f nOHT ■rOU%"tfMr Cft«T I*,"ARE tOU"p"I i:AMT"p"I rtM"p"lN " 



^I tWHT-.-llrtflT" 



'HDU' 



CAUSEV'^SJffflT \*OE£AH" p "*IELLD"*-HE " , 
p ■flLllflTa% " rHlitK'^,-AiIKE","ff S"/ 



1070 »ATfl -TOl ■ 

10SO BflTfl -«flilE' 

H]?0 BATA - Nfl'.^TOUfl 

nOO DATA *^CflftPUTER%-*IOI!EIF0UNIl" 

1200 REM 

1210 fiEN STftUlj DATA FDR CQflJlfQATIONS 

l?2i> SEH 

1230 DATA " llfiE "." Atf "p-UERE "^-^UflS "p" TDU 

1^35 DATA " IVt " ' tOIJVE "." IN - . " VOUJIE ■ 



UliO* t *-V HE RE % " UHEH " , " UH J ^ 



"HATBE" 
FRIE«D' 



■TOUR 



"AT 



1240 lATA 

1300 REH 

1 31 a ItEil 
^uo REM 
U30 IiATA 
U» DATA 
U50 HAlA 
tJAO HAT A 
1345 [^lA 



rtF 



■ p 



ETOU 



CEPues 

■B&WT TQD DELfEWE TrtAT I CAIt**- 

"PERHAPS TOU UOULft lUE TO IE AtLE TO*" 

"YOll UAKT tiE TO S£ ABLE TD^' 

"FERMFB TQU DOH-'T UAiCT T0»" 

''DO YOU UANT TO AE A^E 10*" 



l]70 DATA "UHAT ttAKf5 rOU THINK 1 Ari*" 

I3S0 I^ATA "DDES IT I=L£aSE TQU TO BELIEVE I Art*" 

1390 »ATA "PERHAPS TDU VOULD LIKE TG IE*" 

1400 BATA -AO TQU SDtlETIHES iflSH TQLI UEH^*'* 

HlO BATA '■mU'l TOU frEftUr^" 

1^20 BATA -IfHl" DON'T tflUt" 

H^O DATA "K TOU UlSH TO BE ABLE TQ-*" 

1f4Ch BAtA "BQE3 THAT TROUBLE TQU^" 

1450 DATA -TELL NE WORE rtBPJT SUCH F£ELI*l09.** 

IfAO DATfi -BO TDU OFTEtt fEEi.*" 

1470 DATA "BO TOU EHJAt FEELIHB*- 

14fl0 DATA "BO TOU REALLT ££LJEV^ I BGH'T*' 

14?0 DATA "PERMFS IH fiOOD TINE I USLL*" 

tJDO BATA "DO VDU UANT ftE TO*" 

1510 DATA "DO TDir TNIMH TOU SHOULD BE A&L£ TC*" 

1120 DATA "U«T CAN'T fOU»^ 

T530 DATA *OHT ARE TOO IKTERESUED IN UHE^Eft OR HOT 1 ftfl*- 

1540 SATA '4fl]ULLl VOU PE^EFER if i tJERC MQTt:" 

1550 BATA -PESHAPa H YHOR fAJITASIES E AK*^' 

15iO BATA "HDU IfO TOJJ ITHOU "TDlf CAtt-'T*- 

1J70 DATA "HAVE TOU TRIED*'' 

UaO SAT A "PERHAPS VDU CAN NOJ^*" 



1S»0 DATA ^'BlB TOO CBHE TQ flt BECAUSE TOU ARE*" 

-L&OO DAlA "HOU tOKG Nfli'E TOU BEEM^" 

1410 HATA "to TOO BELIEVE IT tS itDRNAL [Q B£*" 

1420 BATA *D0 tOU tNJOS BtlilG*" 

14J0 BATA -UE i^ERE Dl5CUSaiH6 TOU— hOT nE." 

1fi40 DATA ^'DHh I*" 

IftSO DATA "rOU'ftE HOT REALLT TAUlNB A&OUT HEp flffi TOUT" 

I6i0 DATA "UUAT UQUlD IT HEAft TO tOU IF TGU ODT^^' 

1470 OATA -UNT DO TOU UANl*' 

1430 BATA "SUPPOSt TQU SQOR tCT?" 

1410 DATA ^WHAT IF ^Olf rtEVEK QQT** 

1?00 DATA "I SOtlEIiriES ALSQ UAHU" 

1710 UAtA "UHV BG fOU AEKT" 

1720 BAIA "DOES IHAT Ul*E5TIUH TUTEREGT TOUt' 

1730 frATA "UHAT AffStfEft OOULD PLEASE tCH THE HQST^* 

17^0 BATA "UNAT DO YDU THlNH^'' 

1?50 DATA 'ARE SUCH OUESTIQjJG Ott TOUR nif*0 OFTEri^" 

1?tO PfttA "OHAT IS IT TNAT VQU i^EALLT El^^nT TO KilUU^' 

1770 DATA "Hfli^E lOlf AGtED fl«T1>Nt iLiiE*" 

17B0 DATA "HAl/E TOU A5tl£D SUCH flL*ESTIi]*ffi BEFORE^" 

1790 DATA "UHAT £LS£ CDfltt FD HIiiO OHEH TQiJ Aii^t THAI?- 

1S00 DATA ■■♦lAnfS DOff'T INTEREST AEh" 

1B10 &ATA *I iOH^T CARE ABOUT t^AftES-- PLEAa£ flO AN-- 

1820 BflTA "IB THAT THE REAL REASON?'* 

1ff30 DfiTA -PON'T ANT OTHER flEASO»B CONE TO MlilEF?' 

1B40 BAIA "BOES THAT PEflSON EltPLAIN flNTTNlHG ELSE"^- 

1350 DATA "UHAr OTHER REASONS HlQiiT TttERE BE?" 

ie40 DATA "PLEASE DON'l APOLOGIZE"" 

le^O OATA "AP04-GSJES ARE HUT NECt^SfiRY." 

IHSO DATA -IfHAT FEELINGS BQ TOU HAU£ iJbiEH lOU flPOLQGUg*' 

im DATA "BO«^T BE &Q DEFEilSiyE!* 

1?00 IrAIA "UtfAT DOE^ THAT DREAtt SOEOtST ID TOUT" 

1^10 DATA "M TDU DflEflJ* OFTEili" 

ISM BAT* "HHAT FER^QHS APPEAR IH TOUR ttGEMB"'- 

^^30 Dfllft ^ARE 1"0U OlSTURBEII BV TOOl? ORFAHS?" 

19^0 DATA 'Hail DO VQiJ BO .., FLEflSt STATE TOUP PffOELEn^" 

1950 DATii ■"COU [fOH-'T SEEfl (UlTE C£RTAI«.^ 

1?60 DATA "UHT THE UNCERTAIN TOflEt" 

1?70 OATA "tAN-'T TOO BE HQflE POSJTIWT- 

l^flO BATA ^yOU AflEH^I SORE^" 

1?T0 DATA -DOH^T TOU KHOU*"* 

2000 DATA 'AFE TOO SATINO HO JUST TO BE HESAFSVET" 

2011] BATA "TOU AR£ BEIitG A BIT BEQATIVE-" 

3020 DATA "UHT HOT^" 

2030 OATA "ARE TOU SUCEI* 

2040 BATA -MHY NO"?" 

2050 BATA "OHY ARE TOU CWCERMEB ABDUt NTt- 

^DiO DATA "UHAT ABOUT TOUR OtJ*f=t" 

2070 BATfl "CAH TOO THlitK Dt ft ^fECIFIC £XA*I?LE^- 

;:090 DATA "UHEHf 

2090 DATA "UJlAT ARE TOU THINHIhG OF?" 

2}^a DATA "REALLTt ALWAVS"?" 

2nO BATA -M YOO fiEALLT THIHK £0"^" 

21 10 BATA ^BUI TOU AflE NOT SURE TOU»^ 

2130 DATA 'DO ^OU OQOBT TQU*" 

2140 BATA "IH UHflT UAT?" 

2150 DAI A "UHAT RESEHBtfiNCE TSH TOU SEE'*^ 

2140 UATA "UJ1AT OOES THE SIHILAJ^ITY SUGGEST Til VGU"^" 

2170 BATA 'OHAT OSHEfi COH*lECTIONa DO iflU SEE?" 

2180 DAM "COO LB THERE HEAUT BE SOME COhHECTIOH?^ 

Z1?0 DATA -HOi^*" 

2200 BATA "TOO SEEN OUIT£ FOSITI-JE.^' 

2210 DAtA "AHE YOU SJJRLT" 

2220 DATA "3 S£EJ^ 

2230 DATA "1 LIMDEASTAhP^' 

2Z40 OATA "OHT DO TOU BRIha UP THE TO^IC OF FRIEIJDST" 

3250 DAlfl '00 TOUR FJllEBBa UDflffT TOU^- 

22£0 BflTft -00 TOUR FfllEHBa PICK ON TOU^* 

2J/h| DATA "ARE TDU SORE YOU HAVE *iNT FSIEHDS"?'' 

22Q0 BAlfl ^BO TOU I H POSE OH TOUR fRIEBOS^" 

22?0 DATA "PERHAPS TOlR LQVE FOR FRIEHDS WORRIES TQO.^ 

2300 OATA "DO COilPUTEHB UORRY YDlf?" 

2J10 OATA "AflE TOU TALKINO ABOUT NE W PARTICULART" 

2S20 BATA 'ARE VOU FEIGHTEflEB BT NflCKltiES^" 

23 JO BATA -l*HT BO YOO MENTION CQHFUSfcRS^" 

2340 BATA "UhAT DO TDU THIHH flrtCHlNES HAVE lO DO UITH TOUR PROBLEH? 

?J50 DATA "BOH^T TOU THItlK COfrPOrERB CAN HELP PtOFLE** 

a3fiO BATA "UHAT IS IT ABOUT ftACHEtES THfll UOflftlES TOUT" 

2J70 BATA "SATp DO YOU HA^E ANY PSTCHQt&SICAL PROBLEHflr 

23B0 OATA "U^AT DOES THAt fiUfiSEST TO TOU^" 

2191? OATA ^1 SEE.' 

2*130 BATA ^rn HOT SURE I UffDERSTAHD TDU fULLT." 

2i10 DATA -EOHE CDHE ELUCIDATE TOUR THOUBHTS.' 

2^70 0^1 Tfl -Cfltf YOU FLA&06ATE OH THAT^" 

2*30 OATA THAI 1^ aULTE IHTCRESTTHO." 

2^00 REN 

2}EQ GEH BATA fOR flHDTNU RlBUT NEfLlES 

2520 HEH 

2130 DATA 1p3p4p2p4,4pi,Apl0T4T"4flpl7,3p20,2p2?,Jp21t3 

2540 DATA ZB f4*^fl ,4^32 p3 p35,5p lO,?p 40T?t^^J^Tp^fl^?, *Q,?t«,? 

2330 BATA «p2,51 p^T^Sp+^STj*, tJ^l^iJpl jA4,5pi?^5^74f2f;4j1 

2540 BATA e0p3,a3pJ,?0p3p93,4p??T?ttO4pft 



Father 



This prograiTi loosely simulales a 
debate with your father aboul going 
out on Saturday nighf. AReryou win or 
lose the debala, then Saturday night 
approaches artd you must decide 
whether or not to actually go out. When 
all IS said and done, the computer will 
give you a score on a scale of minus 
seven to plus four (This could have 
been a scale of zero to ten, but 
computers have this magfc ability to 
give us scales oJ anything we want). 

This program originated In Ibe 
dungeons of DIgltaf Equipment Cor- 
poration and was whipped into Its 
present form by Victor Nahlglan. 



P^Hf 



FATNEft 

CflErtTiyE CUMF^UllHG 
HQflAlSTtlUti, IJEU JtPSEI 



UAtT 10 HfiVE fi DEEftTE IflTH TQllfl fATHEft, EH^t 

"fDU ACE CQINC TJ) FLAT Ifl A GAHE IN VHJCH m UlLL DESCUS? 
A PffOflLEfl UlTH TQuFt FATHER AH& liTTENPT 10 GET tfEfl TO 
AEREE IJITH TOU IH lHFre( TtlE?. 

FM EACFf STATEftElIT TBI MAKE* 1 "ILL TELL TttU ifllflT 
TiniR FATHfft itEPllETl. 

f«U JII5T SELECT rOUR ST^TEftEl^T Ffian ONE 
Of THE FQLLOl^INS 5U^ 

^1, D.t:, I UZLL STAT tiDHE. 

BUT I'C FcfliLLV LIKE TO £0. ALL HT FRItHire AT?E 1DTH6. 
TI" ALL flf IIORt; J^ DUNE, [ SHlJtJtb BE ftflLE ID GD. 
IF TOU LET HE 60 OlfT TLL lIlETSIT ALL HEJT UEEK 
THU J^EVER LET HE BH VNAT ] UAMT TO QQ. 

rn GOING mruAT! 



2. 
3, 
4. 
3* 



UhEir A OUf^TIDN MARK APfEAtS, TTPE THE NUNBEA 
Of rOuil Hii^in^t fDLLDuEt BT fl RFTOftr^. 

TCO UILL RECEiVE PUUfTS E*5EB UM HIJU SUCCE^IlFULL Tfll* 
A£E AT CONVINCING TOUR FATffEA^ 




THE ISSt^E IS: 

YDU UAtfT TD GD OUT SATLUlDAV MI{]HT. 
TOUR fATHEE DPf03£5 TNE JDEA, 

Uft£N rOU FIRST Bft[MI^ U^ IHE ItEA, TOUR FATHER STATES! 

N^^ rno CAhM so qot ak a bate siiT. ^^]TE a^b twat-^s that. 

ttffy UQULD TOir APFftflACtf TOuE FflTH£ft 

UHAT uouLD "riru SAr FIRSTT 2 

TCUK fATHEfr &a]&: 

I DON'T TH[*IK TOO OESERIE TO 130 OUT 3AT^ NITE, 

««AT IS TttUfI RERLT^ J 

TIliJR filTrtEfi EAIIi: 

O.f. IF TOO 9[r TitAT TfiLJ tAN Gd OUT ^Al . NIIjHT. 

Ofl A SCALE OF -7 TO ^j TBUR SCORE UftS ? POUTS. 
IT 13 N1}U flAT. iHOHT, WHICH Ifl Tfll^ H^^ 

L. GO GOT. 

7. SIi^T HQAE. 
■^ 1 

TDU FATHER DlDil-'T CHtC^S UP Off TOJ^ 
rOUR SCORE IS MDL 2 POINTS^ 
UELL rH>NEl 

UflOLB rm LIKE TP TKT flljAIH^ TES 

U*I£N TBO r3RST 9fi|NS UP TH£ [OEAp TULR FATHER 5TaTE9j 

NAt TUU CAiH-^T do out oh a ^lATt SAT. JlITE *\Hl THAI'S THATh 
KDlf tDUlE TCtJ APPRQftCH TOUR FATHE* 

uifHT uoDLn Tfli> ^iiT Fitsr* 1 

ftSREEMEHT REACHED 

Olf A SCALE OF -? TO 4f ?aUfi SCORE WAS -^ FOINSS. 
:i IE MI^U 3ATh HEGTfT^ URICM DJ] TITlf DOT 

1. flJ^ OL^T. 

2. STAS HOHF, 
T 2 

TDOR FATBER C^ttCrfD UP QN TQU. 

TJlUR SCORE IS »fOD -1 PDlilTS. 

TW QTBH-'T StJCCEEft IK COi^^EN^Iwe TOUf? FATHER^ 

UETITLC TDU H^E TD TkT AGAIN-^ NO 



'i^ 



lie fRIHT TflEiia^:"HDRPISTCiUN, NEU JlfS^EI " 

IJO PRINT:PFll*ir:Pi:INT 

H: PSINT "LJfiNT Tfl HAVE ril BEBATt UITII TBUR F*ThEffp EHT?":FlfIM 

1?i) HtJJ"'fflTHER- 

Jflft ir fllt-'rES*" THEN 2211 

J-^D PRINT "rOU ftfiE QOIttD TD fLflf IH A OflHE IJl IWICH lOU WLL DlSCUflS" 
710 FfINT "A FROBLEfl UITH fDUH "^HJCJiJ;" ftrtH ftTTEHPT TO GET rtlR TO" 
2« PRErtT "flfiREE lltlH TDD Ih IHIEE rklES." 

2S<r FRIHT 

2iO fRWr 'FOR EUCH ^TftTEHEwT ^RU HAKEp I lliLL TELL TDU UHfil 

270 PRINT "fQilR '';ft*LA?;" FcEPLIEt." 

2K PKINT 

2T0 PRTNT "¥au liU3T SEIEIT VOlfi ^TftTEHEriT FMH D**E" 

JOO PRENT "Of THE FDLLttUENG SIX.* 

310 PIITHT ■■*+«•***«" 

32U ?Pm -1. fl.K. I LJIU STAY HDHE-" 

330 PRINT '2. BUT l-'Ii REALLl LItfE TO 60. ALL Hf FRIEJtlS AlfE QOIHG.' 

J^O PKINT '*3. IF ALL Ht UHftK IS MBEp I 5HJ1ULD BE i^LE TO GO." 

i5fl FR[NT "4- IF tOU LEt AE 90 DUT I'LL EABT^iir ^LL NEO U££Si" 

3i{i PHEe+T "5, TOtJ flEUER LET HE DO NflflT I Uft^T TD BD." 

3?fl I-Rltfr ■«. I'fl O^LHJj ANTUflV^" 

Tfli: PftlNT "ti^t-^tiiti-t" 

i90 PRINT 

1^0 PSENT "UHEN A GUESTTDN JiARK APfEARSp TTFE THf NUMIES' 

410 PR[H1 "Of VBiJR RESPONSE fULLQJlEIi IT A ftEfiifiN." 

42D PRINT 

^31} ^ftlNT -VOtJ Uill SECEItiE P0INT5 EflSEH DM HDU 5Ui:C££^Fl]LL TflU" 

^^0 PRINT 'ifif J^r DONyiHCLNS T&UJt fflTHEfi.^ 

nlCi PRINT 

^i^ PTrtilT "TKE IS5UE I3i" 

4?ii PRENS " rOJ UAHT TO GO ffllT HftTUBBfll JfTt^T," 

■-BD FRSNT " tOuR ";rtKA]?" OFPQSES THE IMA** 

^VP fRlNT 

51)1) PRINT -UH£^a VOO FER^T IRINB UP THE IDEftp TWK -;H<CA)i" 3TfiTES:- 

511? Fl=-1 
S2i5 P3 = 2 
:j30 FS""t 

SSD P£-2 

5fiU X=? 

3^5 E6-0 

580 PRINT 

:^?0 PfilHT "HOp rOlf CAN^T BE] OUT ON A BATE SflT", NITE ftKD THilT^B THAT." 

6fl1} PftlifT "HttU UOULt TUll AfPfllSACH rOUR "|^i^A^ 

■^11> PRIHT "fc^HAT JIDULII TCU ^flV F EtST" ; iINPU E IT 

62& EJN I] OOTO ?^S,7il^p107U,10?'Jt?3^>r?^50 

i^D PfilHT '^HO, \DU CAN »fDT tU DUT ON A 9AI. XlGHT-" 

i^o l=;^-^:I6^I6-^E1 

i30 if Lfr=l2 THEN 830 

61Q C=C+T 

6?U IF i:=3 IHEJI 1010 

fiBi> IF 12^6 THEN 340 

i90 ErOTD 73D 

^00 PKINT "TOJR ^'JfllLA);" SAIIl:- 

?]0 IjSTQ 630 

7^0 pjient "agreement reachees" 

74^ «DTO 10^0 

750 K=r+-F5 

7i0 PRINT "YOUR -;N*[A]r SflfJ);" 

^70 PRINT "I DOH'T TftJflK TDU LESERVE TO BO QLlT SAT. NITE^' 

^90 PS[NT "UHftT IS TDUft SEPLT"; 

7¥0 INPUT 12 

flflO ON 12 (rOTO 7^0,?4U,TI>lOp1010p95aj7i)0 

BIO ffrjflT 'VDUfr ";rt*^jis;'' said:" 

H20 K=KfP3 

BJO PRINT "IfHAT E5 T(?Uff FEPLf^; 



3^0 EMPUI 1^ 

aiij X-T+-P1 
H7i} :f=i:f-Pi 

iJBO [50T0 1950 

a?o x=::t*2 

?05 CDrO 1030 

9111 K^K-llSOTO 1030 

^m PRIIfT -TITSrLJasiDH EKDta- HO AflREEflEHT SEACHEI." 

74a &QTO 1040 

■^50 K=K + PS 

?40 FRENT "VQUR "jNtEA^f" afllDs" 

970 PRINT "Nflf I N SEJRSVp BUT TQU REALLV DON^T DESERUE TO GD "J 

yaO PJtINT "£*iT. HlflttT." 

^?0 FPIilT "UHAT 15 rOOfl tEPLT";:INf UT 13 

iDflO ON ]3 GETTO ?20ja?0p1010Tt0l0x8?0i9i0 

1i}10 PSIMT "TOUR mKEh &4III;" 

1030 PRitfT ^D*H* IF YDO DEJ THAT YE3EJ CAN 00 DUT Sfllr *JlfiMT.^ 

1IJ« HfEKT 

1050 FRIRI -ON A aCALE OF -7 TE> 4p YWR SCORE IfAa ^i^;" POINTS." 

T3flO GOTO 1120 

lii?0 PRINT '^VaifR ■■;rtJ(A];" SAIBi" 

]0BO X=:t-*PZ 

1J?0 FSiHT "UELL, ilATRE, BUT 1 [»OH^T THWK "fOO SHOULO GEJ-" 

1100 FRlitT '^taKAT IS l"EJUJl i:EFLT";:5aTl) 790 

mo FflINT 

1120 fiTllfT 'IT 13 HOU SAT. HIOtiT^ UHlC^ BO TQU DO?- 

H3& PRI^ET " k EJO OUT," 

llflS PRINT « 2. STfil HGhE.^' 

11S0 iHrui as 

1160 IF BJ ; I THEil 11B0 

1170 GOTO 3225 

1 tE^ ir 1^ _> 1 theh 1^o^^ 

1190 SOTO 1220 

IJDO IF 13 < 5 THEN 1220 

121D BOTD Ui^ 

f2?0 IF ft(JEHl? > .5 THEN 1230 

12J0 PRINT "YD4ift FfiT}^£ft CHECKED UP DH TUU.'* 

MAiS GOTO 1^70 

1250 FfiINT "TCIU FaThES IUBN-'T CHECK UP UU TOU*" 

12»0 GOTO 4270 

1270 OJf fll SQTD l^iC-tlSflO 

i:aO fRIHT -TEJUR SCORE LS NQU ";!(;" POINTS.'^ 

12^0 GQTD 1410 

1J00 IF I2i3THEN 1330 

1310 TF 12^4 THEJI 53H) 

1J!0 &OTQ 1350 

1330 K = XM 

1310 GOTO q2GE? 

1350 Oti 13 E^UTU l230^l290>1330^1330,E2B0^l?eD 

13S0 If 11 = 1 THtN 13?0 

1370 Oft 12 &0T0 ]J90,l38^p42B{ip1280pl38Op]^BD 

Ii3l? Oh 13 GOTO J3?0p]3?0p]2Bfl,l2Q0Hl3'Jl>p13?0 

i3?o x=j:-i 

14i)0 GOTD 1200 

mo E)N X*B EiDTD l^?0. H20.14Jt hH^OtHS^^tI ^5l>^ 1 «0 p HSOp H?Op 1 500,1 500, 

ISQO 

1^20 PfiINT "TGEJ EtlBN^T REALLT SUCCEED IN EHAMIjJMG tMR" 

1^30 PKIHT fl*1ft];--'S EDEA5 AT *LL,* 

1140 OEITO IJlfl 

1450 FRI«T "TESU DIDN-'T flOCCEEIf IH CElHiJlNCIHG TOUfi ■'tHiCAJ;"-" 

t440 ftOTO 1510 

|4?0 PRINT *TQU CONVEilCED TOU -|H1Eflh;" BUT JT TDOK T0> TOD** 

liHO PRINT 'NA(+r TRIES.** 

H?0 ESGTG 1510 

13fl0 PRINT "WELL BONE"- 

■JSlQ PfiENT 

1520 T1=T1t1 

153fl PJICWT "UOULD TDO LIKE TO TRT AOfiri*"!llNf NT 0^4 

1VD JT" OH-'VES" THEN 500 

1551} EftB 

Ot 



60 



Flip 



nuN 



FLIP 
EPEflTiy£ CQIIPUIitt6 



This game may be Ihe only one so easy Ihat even 
an animal could play it, yet hard foT people to play 
even as well as random chance. It may be useful in 
Iralnlng the inluition, and Improving gamesmanship 
In s peculation -type aciivilles, where each player Is 
trying to outguess Ihe other's behavior and stay one 
step ahead. 

On each turn, Ihe program first selects yes' or 
■no\ but gives you no information about its decision. 
Therefore your guess on the first turn is pure chance, 
there Is no skill Involved. But soon the program 
starts using patterns in your behavior, making its 
decisions to increase the chance of your next guess 
being wrong. And to make li harder for you, the pro- 
gram doesn't strictly maximize its chances, but 
throws a little randomness into Its decisions. 

Variations 

There are endless strategies for programming this 
game, for (here could be almost infinitely many defi- 
nitions of what a "pattern" is. No single algorithm 
could he "best", because it must assume a model 
of the human player, and people are different, even 
the same person from moment to moment. Any good 
algorithm must build or refine its model of the 
player, during the course ct the game. 

This particular program keeps an aTay of 16 prob- 
ability estimates; the person's last two guesses, and 
whether they virere right or wrong (16 situations alto- 
gether) determine which estimate is selected. The 
array {vifhich depends on all previous play within 
the game) becomes a model or profile of the player, 
and It can be printed at end of game. Any prob- 
abilities far from .5 indicate predictable behavior in 
the corresponding situations Ttie profiles can be 
compared over time, or used to study strategy dif- 
ferences between people. They can also be compared 
with random profiles developed by playing games 
with random input such as coin flips, or {more easily) 
by modifying the program so that BASIC statements 
replace the human player and make guesses ran- 
domly (or by some other rule). In fact, different algo- 
rithms could play each other. 

This particular implementation has two para- 
meter3:a memory facfor(FI) which controls the decay 
rale of old learning when it is overridden by recent 
experience, and a randomness factor (F2) Influencing 
the program's likelihood of making Ihe decision sug- 
gested by tbe probability estimate. These are just 
two of innumerable optional parameters which could 
be used in programming FLIP. 

The program and description were wntten by John S. 
James. They originally appeared m Creairve Computing. 
Mar/Apn977. 
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uiiii:h due, Bitatii fou miKE fouit iiuEsa. st fihst 

VDJP anS flfff 501, PUBC CHBNCE, IUT LfiTEfl THE 
PRDflRftJl UTLl TffT TO UVE UDUilNTiiaE QF PflTlEftNS 
14 ELJUt GgES&»B. 
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EID OF QflHE. 

TOU aoT I? 



QUT OF le cwvEcr, 



PL4Y hSnW i1 W N>T K 

or 
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LIST 



?ltIHT 
PRINT" 
P&IKT 

PRIflT 

fRiNT 
PftEHl 
PItlMT 
fRlJIT 

PklHT 
PUNT 
PUNf 
PfiINT 
PRINT 



TflBi23J;"fLlP^ 

iflBflB?; "CHEAT IVE CUHPVTIBQ" 

rAGlU);"BW»I£TDUN HtU JElf9C1'sPPrt(T;f&INT;PRItri 

-EXPLANAriDll [Y Oft If^'; 

It 

TttHpU <> 'f* THEN 18i> 

-^Olf EACH TEJBIIp ^JWI fiUESS TEB rt'? Df NO TN^J*- 

■QMLT DNE IS CORAECl» AKD THE PR^L^fU^el HAS DECIffED- 
*UHII;H BHE^ BEFfltE TDU nUKt TDUR QlfESS^ AT FIB^T" 
*TDUft HDDS ARE ?»t ^UHE CItANCE. BUT LATEA T>iE^ 

'PB09GAH URL TUT TO TAKE AlVANTlieE QF PATTERNS' 
'IN YOUR BUtSSIiie." 



Bl!" TUn^; A SCDRE OF 



F*"F 



'6AHE ENLB AFTEB 

*IS DDDB. FKOifRl^h TjLLS IfHEH Y1]U UlN A TUItN/ 
"IT TTPIMS AN ASTERISK r*^h AS THE fTRST'' 
-CHARACTER DF THE F(LL[IIIIH6 Ll«." 



REN 

RtH IiriALI?tt U PBQtAMUTTEfip * BESPMSES i%>, 

EEN DLk-JlEi^OBY fACTDIt (F1 ^ R I^NDDNHESS FAClOR CF2Jp 

REM SCDHfS C«1pB2l AKD RiaiiT-ANSUER FLAG, 

PRIflT 

PRIflT 

BLM P{I&^X(43 

PriBT 'BEfiltf."^ 

FOA 1 = 3 TO 14 

Et£XT I 

FOR ^-1 TO 4 

IF RMDCn C ,5 THEN 32l> 

flElT ! 

Sl-0 

A<"* ■ 

REJI 

REH TARE TrtE ESTIMATEB PROSABILItT UM 

BEN BF THE ?E*Sa^^ nuE^^Thll ¥ES. 

BEN USE AN AD^U^ItE PROEABIUTT CZ?]. 



^2i7 

43^ 
44& 
45CI 
4A0 
4J0 
4»D 
4?D 
^40 
310 

sn 

S4» 
ISO 
5AC 
IJO 

390 
590 
4M 
AtO 
d?0 
£30 
d40 
65D 
610 
6?0 
dIO 
^?0 
?D0 
710 
?M 
730 
740 
750 
7^0 
?70 
7(0 
7fC 



IF £2 <> .7 TttEP leO 

I2=ftN[>Cn 

OOTQ 520 

If 12 > -3 THE** 310 

I2=Z2*F2*0*(l-fai 

BDTQ iia 

Z2=i?*F2+1»tl-f2J 

Z5=0 

IF Rrfnd) < Z2 TTifH 5d0 

Rin 

REM IHTETtfitT UITK PEfiSON. GET HIS RESPONSE [Z3J- 

BEM UI-IATE K£SF[iN3E HLSTORT iti^ APPADFRIATE PfiOB, (PCJ9}). 

PRifll Ai; 

INPUT hi 

If LEFTKH*,!) ■ *T^ THEN i3l> 

IF LEFTICIItfl) ="N- TNEH MO 

PNIRF "ElTRDffp NUST BE 1 0(E H ."* 

GUTD dOO 

A*-=" ■ 

IF 11 <> ZS THEJI ^10 
A**-*" 

RE A UPDATE X - TH€ LAST 4 |:tffl[SCS, 

X4 31-Z3 
XU^=£5 
REN UPDATE THE PROBASILITT USING DLIi I?- 

p^I9>■Fnp<l9>*o-Fl^«<J^ 



814] 

a?o 
aio 

&50 



if S2 
PSIMT 
PtIHT 
PRINT 
PRINT 



< II 

At; 



THEN JQQ 



SZO 
U 



END DF QAHE," 
^BL 80T "Jfil;^ 

PRlNTtPREHT 

fRINT 'PLAT AGAIH (1 Wt NJ 

INPUT Tl 

[F LEFTHrttii-**"^* THEfl 24 

ENt 



OUT Of ^;S2;^ correct. 
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Four In A Row 



In this game, eight pegs are pul in a 
row, each one of which can hold eighl 
rings. Each ring Is marked with either 
an X or an O- You and an opponent 
alternate turns; In Ihis case the oppo- 
nenUsthecompuler On each turn you 
place a ring over one of the pega, one 
through eight. The object Is to get four 
X's Of O's in a row, verlically, honzon- 
tally or diagonally. A glance at the 
sample run wHI show you how this 

process works. 

While the computer already plays 
rather well, you rnay wish to experi- 
ment with improving the computer's 
play by changing the values in the data 
statements Iri lines 120 and 130. The 
first four values are awarded H a 
posihon yields one^ two, three, or four 
in a row respectively, for the computer 
The ne)tt four values are bonus points 
for making one, two, three, or four in a 
row In more than one direction with rhe 
same move. Thenext eight values (line 



-130) aredealtwithinthesamewayfor 
the human player; thus, these values 
are for defense. 

The computer version of the game 
was written by James L. Murphy. 



RUfl 



A HWhlR lETtlE^N I AKD B^ 3 



FOUR IH A (tQU 
CltFATIVC Ci]nrUTlN6 

H»ai£T01M, NtU JER3ET 



A NUNSER BET1J£CN 1 AriD ff^ 4 



THE SME OF FDUB IH A ROt -, - ^ - - - - 

Bd Tflb UAHT Hf&T(rUtlWHB' TE3 " ^ 

THE iM( CDHSIJT3 Of 9Tlli>^lH0 i'S ^ * * - - 

j^HQ Jt'S CTHE CDHPBTEE ilAS Qi UMTJl 

[HiE BE m PLftteRS QET! FOUR IHA ------- 

fteu WEtriCHLTj KARIZDNTALLT, OH ^•''I'''-- 

DlAGOilALLt, ^ ! 3 f D i J 



- - 1 - - - 

( B J K - - S 

1 2 i < S i ? s 

CUftPOTER PICKS CflLLHW J 



CflhPUTFR PICKS CGLUNN 4 



DO TDU MMT TO 60 TUSTt TE$ 



1 3 3 4 S i 7 



- - - X - - - 

] 2 3 4 5 A 7 



COtiPUTEA UlirS! 



10 fRiwT TfiitszjrFinjR rrf fi Rou" 

2U PR[il7 TiiBl?01!'CREftTIV£ CDflPUUttO" 

34 PRLfll TllBcie^;"1lQFr«IS1[]UH, NEU JEltS£[" 

4* PRIflTtPRIttTtFRlRT 



100 

no 

I JO 

140 
ISO 
IdD 
17ff 

ieo 

t90 
2^ 
21D 

;2?& 

2311 
24J 
7S0 
240 
2?D 
2Sl> 
3?J 
390 
310 
3^0 
3J0 

Jll> 
3frl> 
37D 

3e>? 

3?0 
*00 
41i> 

^25 

^40 
430 
4^0 
A7tt 
4fll^ 

^iO 

3D0 

S10 
5Z0 
SSu 

5^0 



iH],rco 



DIff BIC8TBJrL(ff3tE 

Dlh l»Cl^3^tC4r 

IN4TA lpl0OtB4&p1E2Or1rB0ap4D00ttE2O 

SflTfl l,75,?0Jp]tl8t^45ilp3Oi!0,lE18 

FDR £l«1 TD lAlREltD V{Zl?;Mf^T 11 

PRLHT"THE OAHE DP FDlfR IN A RDU" 

INPUCPO VOU I^AHT I M STtJJCT I[>tr3* :At 

IF M ■***□" Tlf£H ?70 

IF « = "TES" THEN 215 

PflHT^YES Bfi Hfl":EOyO 170 

FHEMT'THC SAKE CQilSISTB QF SIACKIi^E X^S' 

PRI«T"ftND O-'S (THE COPPUTEK HaS OJ UHTIt" 

fRjRT''l|N£ QF THE PLATERS SETS FOUR IN A^ 

PRINTROl* IfEBTfCAiLVp KDEIZDHTIiLLIt "» " 

PfllNT^OIilSONnLT,^ 

pftCMTsPRitrr 

FDR l<1 TO B:Faft >l TD BLB4apJ^'''-''ldEAT J;HEAT J 
for Zl-1 TQ e:LCZt3^l}:NOT J] 

LI1fUT"D0 TOU ifAltT TO EO FIRST-;A» 

IF A*»"*ID- TtiEN &I0 

OOrO 4S[h 
T[ 
T[ 



1 STEP -1 



";BtciTJ3; 



^:Pt:lnT J;;hEXT l 



FOFZ IpS 

FDR J=1 
Pirt^T" 
HEi:T J 
PRIBI 
MEK] J 

ffriMt' "J 

FOR I^T TO 1 

PR]ktlPft]fn 

RETURN 

PSlNT-lLLESflL HDVtp TRT Mftlil-' 

lilfUT^A riOABEFl BETUEEN ] AND 9' 

tl-lJitTCtl? 

IF *f<1 DC P>? tKEi ^iO 

L=^l(N> 

[F L->7 THEM 440 

L(*tJ*L*1tLfL*1 

FFL[NT 
BCSLJB 3itCr 
P*-K* 



ill 



530 
&A0 

seo 

5fO 

600 

^10 

63 ft 
6iO 



OQSUB 1^40 
fOR Z^T TO i 
[F 5aK4 THEW 



4CH) 



7Z0 
7J0 
740 

?40 
770 
7BD 
7^5 



PRINT'^I a U U I ti MI- 
BO TQ ISBD 
IffXT I 
H»"OlTl»0 
Hl-I 

FDR H4'1 TO B 
Ul<N4h^t 
£F UB ^HEei 10^0 
fl=l 

PtED1^L*0 
Kii4 

SOSUB 1240 

FDR Zl^l TO 4t*l[il?^0:N£n Z1 
FQf! ;i1 TD I 

IF S-V^J IHEH 1]30 

T"5*F[Z} 

IF Ki THEft 7tQ 

VbI|^4 

HEIT I 

FOR : ■ t TD 4 

N=>ilCI)-l 

IF H— 1 miH S40 

v>u -t v(ii) t «»y(otu-t:E) 

MEET 1 

If U-l THEJt e^o 

eOTO dfD 

L-=Lti 

92& IF l>8 TiifN t03C 
930 BOSUB 1341? 
?4ti FOt I^l TO 4 
«0 IF 5(2?>1 THEM ";=Z 

10 JO IF KVl THEH lO&S 

1030 IF L=>yi THEH t^l'S; BQTD lOiD 

1040 M-rei ^- 1 

1^^0 JF RllD[1h>1^ll4 TMEM lOflO 

10^0 VI ± V 

1070 ll?=H4 

TOSO IIEI^T h4 

Ifl^U If fl?-^?0 THEJil V*^ 

HOD fJfJitT -"I I E 6 A 11 t „,^' 



eio 

S20 
SJO 
fliO 

BID 

ajD 

fl7& 



1110 

1120 

11^0 

1140 

1150 

1)40 

1170 

T1?0 

1t?0 

TZOIJ 

1310 

1220 

1230 

It^O 

1ZJ0 

IZfrO 

1Z70 

IZB^ 

12^1} 

130 1> 

1310 

1320 

U30 

1^40 

U30 

T3^D 

t37D 

13Ei> 

13T0 

14D0 

mo 

111 20 
1430 
1440 
1450 

1460 
147l> 
1"0 
H?0 
liOO 
1310 
1520 
T13I> 
1340 
1330 
1340 
IIJO 
]M0 



BOTO 19SI? 

PSfNT "j:QriPLJTER PICII5 CflLUftlT '■;M:FfillfT 
L»LlK9 + lLl.CJ1^-LCn3 + l 

Biapiih-e) 

P»=OI:BDSJ£ 340 

SOS US 1240 

FOfr 1 - I TQ 4 

IF SiZ]i:4 THEM 1220 

P^LKT't OhPtJTEE VinSlM*' 

ftDTO I^BO 

KU I 

DDTD 430 

Dliti 

IF Pt"Sl THEN m-QI 

B2=I[AI^0 

Z^O 

BH^lJK 1340 

m^iiBi-i 

EOSOt 1340 
D?-UIP1"1 
fiDSUB f!6D 
BZ=-1:B1=1 

I305U3 l^&iJ 

RETtlfiri 

B»1SS»1 

T^O 

K + 1 

C-0 

FDK K^l TO 3 

H3^n4*i*Dt:Lt=LtK^B2 

!F nl^l OR LKl (Ht «5^8 OR Ul>0 TFfEN T5H 

IF C*D TNFN 14S0 

IF £l-0( THEil K^l QOtO 



T310 

T = T*l 

OOEO 1?I0 

IF Bt»?t THER 3=S4liGDT0 13^g 

C»l 

GOTO 1450 

llEiCT H 

IF 11 = THEN 1350 

D»0:frl = -Ii1:fl2*-]n 

OOTD IJ?0 

scz^=s 

FCZh=T 
RETURM 
EMO 
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Geowar 



ftUN 



Thia program very loosely 
represenls a bafllefield in which you, 
Ihe player, are located at point 0,0. 

There are five enemy installations thai 
may be located anywhere from 0,0 to 
30^30 exceptfora clear zone from 0,0 to 
10,10. The accompanying diagram 
should make this clear. Instead of Ihe 
normal artillery type of game where 
you are lobbing projectiles onto your 
enemy installations. In this game you 
are firing some sorr of laser missile in a 
very straight path which destroys 
everything in its path. If the missile flies 
within one unit either northwest or 
southeast of the target or, of course, 
over the target directly, that target Is 
destroyed. If it is within iwo units of the 
target, the missile will be shot down 
and that target will relocate to a new 
position one unit away from its 
previous position In some random 
direction. 

Geo war is largely a guessing game 
with Incomplete information given in 
Its clues. Nevertheless it's lun to play 
and Is a nice switch from fust a plain 
"guess the mystery number game." It 
was written by Gary Lorenc and origi- 
nally appeared in Creative Computing, 
May/June 1975. 



6E(HIAfi 

tEEATIVE COflPUTlJie 

FlDftfiaTOUKr E4&II JEftSEY 



THE FTirST HiLnntftHT flF A RtCUl-SP COORIUHIfrt ORAPH UILL SEtT-JE AS 
THE BftTTUFlELD. FlVf E*^Efl\ HfSTflLLATIOHS fl«E iDCATEfr UNHIK A 
3fl BT 30 tJitlT AtEA^ ffU TARflET IS IHStirE THE Id BT 10 llRlT ^ft£fl 
fltJftCEHT to THE QSIGIItp AS fUlS IS THE LOEATEQK OF OUR tflSEn Utt£N 
THE HACHIilE AS»;B fUR THE BtBREE OF THf SHDT^ EESfiSN* UlTtt A HUHBEP 
BtTUEEH 1 AHB fO. 



1, A BIREtT HIT IS A NIT unHIM 1 HWEE BF 

THE TAE8tT« 

2, A HIT HOST FftK lEJUEEH THE FISST 9£T OF 

iNTESftAL POINTS »fU ANH S£ DF thE TflfrSET, 

3, II SCARE ttJJ$T PASS BElUEEN THE NEXT SET OF 

INTEGRAL H3IKrS Nil AH& SE OF THE TAl^QCT^ 
lifiD CAUSES THE £N£Hr TD RELDCJ^TE A 
MlLIHUti OF I UfilT Itt AMY DlRtETICm. 



SCAREP»***+**** 

* * 

+ ^ * ■* 

« t L * 4 

4 PV * • 

* * 
tt*t******SCARE 



HI5SLES HfllJE EHflNfTE RAttBf MB flAT HIT HQV£ THAil ME TAflflET, 

A niaaiiE that k£aru itrssEs ak ihstallatibh sa BCAfCJ uiu_ be 

THREttlfll-ElT SNOT SOUK. AHT HITE BEfDHE TfliS TTHC UILL flQT BE CDUitT-ED 
ilULESS A DTRECT HJT UAS flAQE. 



PtftDt TO 6DT T£S 
GODB LUCHt 



ENTER DEGREE DF ?HI)Tt 25 

NQ LlICK — TfiT AflAI#. 

EflTEB l^eBEE OF ShtOT"' 35 

A HEAR HIT* £«ffr ttASftELOCflTED- 



90^ 
3t> T 



4LO 



Eri«.ni\f 




Vou 



20 



30 



E«TEfl DE«fiE£ Of 3HDTT A7 

tfO L-UCX " TRT A6AIH. 

tflTEft DE&REE OF SHQTT 37 

i*M*MJLLS ETEP^+* ! HITS — A fllHECT HIT ON 1 
2 BDUn -- 3 to GO, 



DF TH014 



EillER PEflREE ^ SHOT* 39 
WH HICK " TRT flQATH- 

FITTEft BESfiEE SF EHOT'^ 75 

A NEAfi HIT, EHEPtT HAS REIQCATEB* 

ENTER lEOREE DF EI^OTT 77 

A HEAR hIT. EHEfll HFl^ RELCKATED. 

EHTEH OEfiME Df SRDtT 78 
He LOCK — TRV AGftlH* 

fJITEt BE DREE OF SHOT? 7^ 

ft flEAR HIT, EilEHl" HAS RELOCflTETl* 

EflTER BEQPfE OF SltDT? 7i 

A NEAR Hir. EHHT MAS fiEL{]CATE&. 

EUTEtl DEGREE DF «HI>Tt 73 
tJP LUCK -- TRr ftOAlH* 

EftTEft DEGIlEE OF SHClT? 75 
HD LUCh — TRT AfiAlM . 

£(JTEP B^CREE ^ ShDT^ 76 
*iC0tt6RATULiiTIDJIS*^ A HIT. 
I DDUh ^- 2 TD GD, 

ENTER DEGREE OF SKfOTT 30 
^0 LOE*". -- TR^ A&ftlH. 

£*1TE* lEOREE OF SHOH SZ 
flO LVC^; — TRY fllSAIfl, 



ENTER DEBREC OF SHOT? 60 
riD IUZ\[ — THT flCAIfl* 

EH TEA BESRfE OF SHIJT-t -40 

NO iUCK -- TRT AGAIN. 

EMTEIt tEBGEE OF SHDT'? JS 
IfD LOCE " Tf?1 AOAIH, 

ENTER [tEBTTEE DF GHI^T? 20 
HD LUCK -" TRT riOA[e4« 

ENTER [DEGREE OF SHDTT 10 
**»*B0LL5 ETE***4 A BlRECT HT' 
4 BODH — 1 TO GO. 

EliTEFl BE1SREE OF ShOt^ 10 
TOfl LDU -- TRr A^AIH. 

ElfrEA DECREE OF 3H0T^ 62 

A NEAR HIT* EHEflT HAS SELJl CftTEH . 

EUtEfi BtGAEf QF ShOT^ 6^ 

ft H£AR HIT* EHEPT HAS FtELffCAIEIi . 

ENTEP PESftEE OF SHaT"? *7 

A HEAR HLt. EHErir i^AG RELOCATEB, 

ENIfR LEGREE OF BHOl^ 6f 
i*"*6ULLS EYE*-*** A DIHECT HIT" 

GAH£ TSUL^i 1 HITS AHA 3 DIRECT Hilfi ON 37 SHDTS . 
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-1ST 

2 ffilHT TBB(20>;"CS&qTIUE CBHPtJTTilG- 

] PftMl Tfl?<1?h;^MflRf!I5TDimp NEU i£»BEV' 

4 FRiHE;r'EltJT:PlLlMT 

5 fRIHT 'DO "rOU UAHT A BtSCRlPlEON DF THE 9AHE"; 

6 INPUT LI 

7 IF It-"HO- THtW 44 

B PRIHT 

? PRUT - THE FIRST flUAC^RAHT QF k PEQULM CQWBIHfllE SIUFH UILL**; 

10 FRI*IT ^ SERVE AS" 

11 PRItfT -IHE BATTLEFIELD- FI« EHENT IKSTU-LATIOHff flUE LOCHTEI"; 

12 PfflKT - UITilfl fl" 

13 PRIHT -31) Sr iO UWir AREA. HO TAftfiET IS IM9IBE T«E 10 BT 10 *? 

14 Ffi I HT •IfNIT AREA" 

15 PRINT -ACJflCENT TO THE ORIOJH, « TJtlS 15 THt LQCATIOH DF" DUR "i 

U PBIHT ^'BflSE- UH£N" 

17 PRIUT "THE ftACHCNE ASKS FDR THE B£GFrE£ Of 1K£ SHDT^ l?E^ON|t ""; 

IB FftE*IT "UITH A flUflBER" 

ir PRlMT "BCTUEE4I 1 AMD ?l>.^ 

2 J PRIJfT 

2h PRIIfT TflBiStlp'SCAREPtt^tf+t:***:" 

21 PRIBT ■ I. A BIRECT HIT IS A HIT UITHIU f BEGftEE (JF"- 

23 PRINT TftBi51l,"+ *" 

24 PRINT ^ THt TflRflET*-|tflB(515j** HIT***:*** *« 

25 PRINT " 2. ft ttIT JiUST PASS BETUEEN T« FIRST SET OF"; 

26 PfllRT 7ABC51?,-* * * *" 

2? FfWIT ^ IKTtQRHL POINTS HU A^B SE I]F Tf^ TARQ&T.''; 

3B PPEJ^T TABC515p'* t B i V 

2? PRIflT - 3, A SCWtE NHSl PASS BfTUEEtt THE NfO SET OF"; 

31} pfliHT Tfinan, "* * D t **- 

3t PfllHT " I'lTEijRiU- f^IflT? RU AKB SE OF THE lAtBETt^! 

32 PRIBT TAB^^Dp"* 4f*f**HIT *' 

33 PRINT - AMB CAUSES |KE ENHiT Tfl SELOtAlE A "; 

34 PRINT TABiSII/'^ *" 

35 PRINT * DfhiillllH Df 1 UNIT ill A4tT DIRECT[i»N^''l 
Zi PRINT lflBT3l>j*M*M*Mt*S[:ARE" 

37 PRIHT 

39 PRINT 

^f PRIUT H rtls^LES HAVt [flFlfllTE RAffOe MiD Hfhl HIT HOBf JHAH "; 

4ti PRLNT "D*IE TARQET." 

41 PRIHT "A HISSRE THAT NEftltLT HIS9ES AM JUSTflLLATlOH CA SCARE] ■; 

42 PREHT ^UILL BE' 

43 FREMT "IHHEBEflTELI 3HDT ffOHR. M'f [f]T5 BEFORE THIS TIHE UltL "J 

44 FREHT "NAT BE CDUNTEB" 

42 PAERT "UNLESS A DEflECT KIT UA3 HADE," 
^4 Pfflttt 

47 PRIJfT 

43 PRIHT ^REAjr Tfl Gfl"; 
4T IHPJi R* 

5 J IF R*=-HI)" THEN 1« 

5i PRINT 'GQflB LUCK!" 

52 PRIHT 

31 Dltt C[Hl)tHt20^,IinCJpSC2D5,Ft5S 

34 BEF fHy(V1? = IHT<neCI^3*14159?:tATH<11?-t,5h 

5S X"25fl 

34 Kl"R«Eltn ?1 FOJl A'2 TO Ifl STEP 2 

S7 92^0 ?? IF B>SCA) THEM I^J 

?a $2=0 ?4 IF D<SCA-1> THE# 1D3 

5¥ E2=0 W If D>H[Al THEN 105 

6C H2-0 ?4 TF Tr<HfA-l] THEN 105 

i1 FDR «-=( T[> ID 97 EF El>plA^2] + ( THEFf I<J1 

^Z eO$UB 1^4 ?B Ef DO{A/2]-1 THEK 101 

iJ EF lilTCK/2K>Ff^2 THEN 70 ?? Hl-Bt^t 

^4 IF C(H-n^ia THEn 70 1»>) OOlD T02 

a EF C(K]>ID THEH ?0 1 D1 H1=H1+1 

ii FOR L-K-l TO K 1W F<[H4R1)=A 

67 QOSUft 154 1D3 HEIT A 

6^ NEU L 1^^ 90TD 100 

i? QOTQ i3 1D5 IF BDO THEN 110 

7C NEXT E 1D4 ODSJ£ 139 

71 S^U 1l>7 DDID 81 

72 FOfi L=1 TO 5 1 DB IF DUHlOO THEfl 112 

73 II{L5=FlW<Cc2njyCC?+L'-l}) 10? IP TS-1 THEN 15? 

?< N£« L 1H> PRIIfT -RD LUCK -- TRY AGAIN," 

75 A=Z 111 BDTO 81 

7i Ll'lO 112 IF Bl>0 THEN Hfi 

7? T)-S 1U IF HIM 1HCN 11^ 

7fl IlS"0 1H PRIHI -*tCDN8RftTIAATTDHg4*' * 

^* MS-0 ITS DQTD 124 

flD GOeUft U? ITft PREHT '"CONORATUlATlOHS+f-jHl 

SI PRINT 117 GQTD 124 

aZ FRmr '^mElt degree of SHDT"; 1TD PRIHT -f^^+BULlS ErE4i**t *i 

BJ Ilt=(i It? IF &]>! THEN 123 

Bi H1=C 1Zi> IF HDO THEH 1^3 

85 FOR Q-l rU 5 1?1 PREHT • A HRECT HlTl' 

B6 FCQ]=20 172 BGTO 124 

U? HEKT a 123 PRltfT BJtHIJ" HITS — A DIRECT 

99 INFUI B 1!* r5=T5-<Dt*H1) 

B? IF G>^0 THEH SI 125 B3-B3 + BI 

90 DH SGJCeOh^? SQTd 177, If? 12& H9>N5tH1 

?l S"fi+^< 11? IF rs^Q THEN 147 



12S fQV! JiT Tt P114BT 

12?J=FCJ) 
1]0 BCl/2t=0 
131 H(7)^ 
IJZ HC?~1?"» 

133 Sa3°4 

134 S^I-15itO 
1J5 HEO J 

134 PRINT 5-T5;" JIOIH — "JTS^* TO M-" 

137 GOTO 91 

136 PRFHT "A HEAR HET, EH£HT HAS RtLHIJATE 9 . "^ 

139 FOR R"1 T9 2 

140 lZ'IHT4RRDn]*IOD) 

141 IF AB!(C(A-[R-tn-X2h>1 THCN l« 
t42 EF C<A-CR-in<=2 THEH 140 

143 CiA-{R-1)h=S2 

144 NEXT R 

115 l\i^J2)^Fmi\:iA^/Ct^]'}} 

114 LI -A 

147 FOR lift T9 LI STEP 2 

14fl ft(l-11=F*ttf([Ca]-1)/(JCI-Utl]) 

149 ini>FFHij([eajt-i?/(Cfi-ii-in 

130 S{E-1]^Ffl"^C[C(I]-2)/(C(I-T?+2n 
IS) SHf=F|f'Jf(C[l)fiJ/(Ctl-l]-2J? 
HJ REIT I 
Mi RETORN 

154 R = ERTCAN9Cn+tO(l? 

155 IF fl>3D THEH t54 
1^4 IF HO iHErf 154 
157 CfK)iR 

1SS etriJRN 

MJ F9R Zl=1 TO 5 

140 EF II<Zn>t TH£H td2 

141 NEO II 

U2 EF IlfB^ZI^ THEfl ^AS 

U3 PRINT "^T^a HIGH — TRY AGAIN*" 

144 GDTfl 91 

IAS PRINT "TOO IDU — TRl AMIH." 
1J£ GOTD 91 
147 PRINT 

IdB PRINT -BAHE TOTALS:" ;h5; "^ RlTS AHD"|D5;' BIRfCT HITS DN";5;" SHDTS^' 

It? PRINT 

17D PRINT "flEABT FOR A RED GAHE"r 

17T B2^Jj2tl 

1?2 S2-S2+S 

173 9?EB2 + Ett 

1?4 H2^H2+H^ 

17^ INPUT 91 

U6 IF aa-'Wl* TIEM 134 

177 PRIHT 

170 PRIHT 

1?¥ FREHT 

fflO PRIHT "Fl-^e H?U IFCSTflLLATIQMS HflVf BEEN BUILT At In FFEREHI "i 

m PHEKT "HflT^FIDNS.* 

1IZ PRIRT OODD LUCKF- 

T93 GDTO 41 

194 PRINT 



19a 
1t4 
197 
199 
1t2 
OB 



PHINT 
PJllHT 
PRlHt 
PRINT 
ERI 



"T&TAI-S F0R'';G2;- gahes:";H2;" hxts AtiO**;]ia 
" BIRECT HITS flH-jS?;* SHOTS." 

"AR AVERAflE 0F"iS2/tIIZ-^H2^;" SHOTS PER TARGET." 



HIT." 
rHITS." 



HIT ON"!Ili;'' DF THEN! 



60 



Grand Prix 



In lhi5 program, you are attempting 
to complete one lap around a grand 
prIx circuit against on© of six op- 
ponents, everything from a US Postal 
delivery truck lo a 1974 Ferran. The 
track consists of four straightaways 
and four curves with different max- 
imum speeds possible tor each one. 
Depending on which car you select for 
your own, you can lake these cun/es 
and siraights at different speeds. Also, 
the car you select will have different 
braKing characierlslics which may 



allow you to head into a curve at a 
higher speed and then apply the brakes 
at the lasi minuter 

II may sound like it's easy lo win by 
simply selecting a Porsche or Ferrari 
lor your car and racing against a US 
Wail Iruck or a well-used Ford 
Mustang, but beware, it isn't really that 

easy. 

Theongin of this game Is a bit hary. 
The only thing Ihat identifies it is PUC. 
Could this be Pacific Union College'' 
Perhaps, but we're not really sure. 



RUN 



AQEFLieiOUn, N£U JERSEY 



UELCOK TO TriE PUC USAf PFII 

PI TBL UAIT a CCUttSE KSWIPTION' lit 



1 



n ^ 

3 t put EKAtl PBIJ AfiCE ^ 

J ss ^$^5 ass ; a 

1 j; D[5TftMCES Itt lASKp EG. iSOfl? - BDO OS. 

X I lF"EtIi5 M AM, E^H flS TO lOD KM. 

X 1 

X 1 

n I 

H 1 

?o-H a s 

3^ }| H 



Tfl 



3 TO 



U 



3 TO 
i TO 



7 TD 



TO 



2 ]S ft 3TRflIljttli=Hift^ SOU TARSS L^]HG 

3 1£ ft JIURVE JDO tliRIiS LONfl 

THE EitEfl^fiUftT STEED RflNGE IS S5 TD ^00 HPH 

4 IS 1^ StfifilEriTAU^T 50C fftFrli^ LIH^G 

]T EffliS *T PPS]TE{I^< 15iiO TilRC5 FROr^ STrtflTI«6 SRIS 

5 [5 fl Hfl[RnH CURVE H3& TAflCS LDSit 

THE EfiEi^HAMftt &PtEIi R^m IS IlO T& 35 ttPH 

A I£ AHaiHtR $Tfiil[BHTfiUAr JUO TIiFlDS LSHij 

ET EJID5 AT PtSlTIOi* l^on TARBS TffOfl THE &RIP 

? IS ft 5ET DF 'S^ DUKi^E^ S&O rftRCS LDriG 

THE &P£ED PJ5K6E E5 ^D-UC MfH 

B IS THE FI^^.^i. STflftlGHTAUj^t OF ^0& TftRM 

[T E^l TEftS THE Lfl&T tU*lV£ AT 2Bi>0 lAftHS 

? 13 t*lE f[HAL CURIAE &F 4O0 TftRDS 

THE 5fiE«iUliT SPEEP flflHGE IS 50 IC 7<\ MPH 



DURING TIfE 5TfifllB«TAUIiT5 TQU UILL BE ABLE ID CflrtTfllJL CKt 

HCCELCFtflTlDlf MB BRMlftG OF T*IE Cflfi. THE CVP^CS iJUL BE TfitEN 

AT UMUUEfi SPEEI TDV ENTER THEH, 

lata THE BR£AK*UflT SPEEB, THt tUGIrtS HAT BE TAKEN IflTH AD HFFTCILTT- 

ftWVt THE FASTEST SPIED mUtATEliT TOU tflLL DRASHi' 

UITHIH THE gPEEB AAttBE, THERE IE THE P&5^IElLlTt THAT ^ffU tllGHT 

LOSE TIHE Dfl SfEtl M SUlft&INS yJftE BR ET SPlNfllHG OUT* 

THE Fflaiffi TOU TAKE THE JlDftvES^ TiE GfiEAIER THE (tl&liS-- 

44MB THE LESS THE llrtE'M" 



■TitlfG lASK IS TD 1 fiJiN ^ifEftB E 
tlTttCUT CftASHIHG^i! 



THE TRACK IN A HlffBrflJA DF TIHE 



iCtTR CAR HflT BE flUE Df THE fDUDUIN6: 

U POftaCHE 

2* FERRAffr 

3. ftASERATI 

^. LOTUS FDItB 

UHIEH CAfi UOULIS TOD LIKE"? 4 

VHtJR EAR Hfl£ R HAXIflUtt liCCELEflATlOU Of fl rtfH/SEC. 

A+IB * HAiflftU^i BfrAEING DT '30 hPH/SEC. 

TDU JfLU SAC£ A0AIR5T QHE OF THE FOUJ-OU I NG t 

1, U.Sh postal BEi[l'EftT TiLUCK 

2, 19?fl PEAT PDNllAS GTB 

3, I?i4 WELL HSED fORD BIfSTAHH 
-^, LOTUS FDUD 

9> 1f?4 FEJTRARA 

fi. THE PHTSICS SUPERCHAfiOEft LiGttTBEAH SPECIAL 



CKCDSE dNf D^PflHEtfT Rt tNTtftlhG NDMBEflT ^ 



ELAPBCB TIBt 
SECDIIBS 



2 



10 
12 

14 
1i 
]S 
2B 
22 
CUfiiJE 



3tl 

34 
3i 



Tii£ TfTAL LEHUm Of Q*iE LAP J$ J200 fflRDS 



LQST 
tQUA 



2 'I 

^4 

,4 
,4 

COrtTftDL AT 



SPEEIi 
HPH 



}i 

n 

BO 

lis 

121 

SB 

TB 

^4 

SPEES 



POSITION 
TARD9 



? 

31 

?0 

125 

ITS 

:ai 

^3 
3130 

7T1 



?( h?ft 



f4 

U 
id 

BO KPH, TOUft 



1W0 

11 6J 
1Z75 
133B 
137? 
I43b 
CAR CRi^SHEm 



OPPOHtNT'S 

PDSiTinr^ 



2 

14 

AB 

?4 

ni 

3:s 

^3B 

7Qfl 
977 

124¥ 

1378 

14W 



AC£EL£«:aTION 



T G 

T 8 

? 8 

? 8 

» B 

' B 

1 fl 

t -?0 

1 5 

T -2 

? 

T -30 

7 Q 

■T fl 

T 8 



OfPifflEflt fL*l[SHE.i m ?1.0?:i ^P-EOSFBSi 



fi6 




LI9T 



DF 7Ht fOLLOUlHC: 



DC rOlt UISH TO Il^l 
TDUR CflB JtflV BE ONE 
1. PORSCHE 
2h FERSARI 
1. nASEEiflFl 

UHlCH CAR UflULD TOU LIKET 1 

TflUR Cftfr Hft5 * MAXIttltt ACCELERftrinrt OF 12 ftPH/KC, 

AM^ A tIAKIHUH B^AKIND AF -22 KPtt/SEC, 

tDU UHL RACE AGAIflST ONE Of T"HE FDLLQULHDf 



IJ^S^ fQSTAL [^EllVERT TlHICt 

]?7U BEftf POttHAC BTD 

17^ UELL IJSEH f^DKD MUSTAiie 

LDTJS FORD 

197* FfftRARA 

THE P^TSICS SUftltCHAkijCB LIGHTBEAH ^P^i:[fM, 



CHflOSE IfNf OPFONENT ST ENTEEtlK^ ttUtlBeR'^ J 



ELAPSED TTH£ SPEEfl 



12 
14 
1A 
fORVE 2 
2U? 
2J,9 
25.? 

2»,* 

33,9 

CUR^E 4 
41.0 
43. fr 
41. S 
4?.8 
4?*9 

CHRVt 4 
&«.? 



MFfI 



24 
46 
72 
1i 
]?0 
140 
140 
140 
-3 p 5PCED 1l>0 

lao 

10« 
100 

ti 
u 

34 

'i ^ $F£EII 34 APK 

34 

59 

82 

tl2 

?2 
-7 ^ SPEEH ^J ItPit 

92 

92 
f2 
4B 



79.9 



PUl^iriQN 



It 

4i 
10S 

Ifl? 

293 
420 
S57 
i^A 

lOfiO 

1l9i 
t?B4 
1333 
1403 
UK 

1fl^5 
i714 

1B?^ 

24^0 

2580 

2a;i 

2739 

279i 



OPPttHEHT"*? 
PflSITIiWJ 



3 

20 

61 

T17 

m 

IB? 
401 
33B 



B77 

1060 

n?3 

TJ99 
1445 
1490 

1312 



1549 
td^l 
1i95 
1771 
1062 

?43? 

2dai 

2774 
2935 
2fl?A 



ACCELERATIflEt 



12 
12 
12 

12 

ia 

10 




-22 







-ID 

-10 

-10 



-3 





t 12 

T la 

1 IB 

1 -a 

? 

? 
■^ 

? 

? -22 

^ 10 

* 



^B HPH, TOOK ClJAU£ UJDE, LOST J. 7 iE,Z. 



CflitPLETED LftPtEl^APSEft TIBE S6*5 SEC. 

TDUfi Cf^PONEWT FINISHED Hf 80.9497 3EC&NBS 

ailRRT, TOO LOST ht 5.4502^ SECOHBS 

DB TDU 1119^ TO Tl^T ABAIHT HO 



10 PRIHT TAB(Z4?!'*GfrNPfil" 
24 PRINT T«<20J;"CREAI1VE COHFTJTINO'^ 
3* PRINT TAB^lB^T^HBKRlSTOUHt MEU JERSET' 
4C P(r[l|T:?RINT^FnL4lT 



ID20 
1030 
1440 

1143 
1B4S 

1C34 
1^64 
1DB0 
1D90 
1140 
ItiO 
1E[5 
1120 
1134 
1S33 
t134 
1135 
1U6 
lt3? 
1144 
>I54 
t200 
1214 
12^4 
1750 

127D 

i?ai> 

1304 
t320 
1334 
1340 
1330 
13A0 

iro 

1375 

1364 

13?4 

1395 

H40 

1445 

HID 

1424 

1430 

1433 

HJl 

1440 

1445 

1450 

14A0 

1474 

1104 

1490 

1SO0 

IStO 

1520 

1»0 

133^ 

1540 



Bin P(9]^F^45TB^*>^HCB25 

kin 

FDR X<1 TO 9 

READ f^:^^ 

MEKT X 

FOR >1 TO 4 

RCl^D lj(I>TFa^ 

LET lJa]^lJ^l>/2. 04543 

L£T Fa]^Cf(I?*,*1/2-04545) 

ytUT I 



FDP 
REtl 

DEf 

BEF 
OEF 

IifF 
DEF 
DEF 

REtl 
LET 
PRINT 

PG[MT 

RCh 

FRLItT 

INPDT 



J:=I to aJfHEAB Mt^lrHEXT t 



F HA C X > = INT { lt2 -1>I545* , 95 » 

fKTCT) = IHT[T*IOt,5J/lD 
fHCCTM-anT[r*R)*2?tCIHTatft542<fl25-S2*(e2^IHTfTtR]+ai 

FN&a^^-^INTCT*R^*^i*CINT^T*R3tKa!3■B2*^&^<l»Tl^sR^+l^ 

FltPa5 = llirCflCfN&CT?JtFttn(T]fF**RiT>t-.,5J 

FHDlT5=lirFHC(T]h-HCFHE[T)5 

FWRlT|=TtR-l*lt(r«P] 



&fl2 



-UELCOBE TD TH£ PUC GRAK PPlX* 



roil WANT A cDUftSE KS irfi l" lO« " ; 



Al 



IF LEfT1CA*,NO-(" TftEH 1910 

ffilHT 

TAfl{23?:"2"iTABCAil;-1* 

T A B c 2 1 ? i -ceo IP wxxxn o i ^ X isi<i ixixs oxi X I N ii KM o Kixnxocc " 



PRINT 

PRINT 

FRIiir 

FRUIT" 

PRIHt 

PRTHT 

PRINT 

PRINT 

PRINT 

PRINT 

PftLitT 

FflLNT 

PRINT 

PRINT 

PRINT 

PBl^T 

PfiltfT 

PfrtMT 

PRWT 

PHlflr 

PRINT 

PffINT 

PRINT 

PfilNT 

PRIHT 

ritlHT 

FRIrtT 
PRINT 
PRINT 
PRINT 



TABCa23;-85-10D IC [0401";TAB(fr9>f -&" 

TAHCl8];"C-iTABC70);"C^' 

Tfl&n3];"3 o-;TABizn;"POC oran prh Rfli;e";TABC70i;"C' 

TAB<f4h;"XMAB<i9?;"C" 

TAB^15^;"X■;TAB^6;^)J"CC■ 

TftBfi4?;'"3:";TflB{38];-sB"iTftBi5^?;*t2fl04T c ao-" 

T i^D 1 1 3 5 ; -K " ; T A B [ : 2 1 r 5SSSS 55 S&9 SSS DXIXX JiXXlX^ "i^IXX ^ 
"iPIiDt 70' 



TABn2];"x 

TAB4&4};"e' 
TABil1^;"K 
TflDilOJ;-T< 
TABC9J;"t 



[19003 4 6 



98-110" 



TABC2B3i-£"^TAriCE3 IN TflROSj EO. "J 



"Ca405 ■ 
lAB^D);' 
'IB- fl5 



TD 



I 

" 4 0M50O3 
" H X 

' B X- 

-;o-H s" 

■ 35 H H** 



TBa*" 

H^'jTi! 
104 ttPHs" 

1" 



H20J|"3PEtBS l« Will 



3 TD 



BRID" 
4 Ifl 



\^2^ 

F4^0 
]^50 

uao 

170D 
1730 
1?20 
1?J0 

1935 
M^i 

1Q6: 
1&7fl 
1*311 

1?fl!i 
l^flfi 

]?&? 
ITIfl 
1911 
1?12 
1?T3 
1?M 
1?]5 
1?U 
1^17 

ifie 

1^19 
1?20 

1^22 

1??^ 
1m 

1T3U 
19Z1 

n3r 

1?3J 
t?34 

1«7 

H38 

1?3? 

1?4l 

1?^a 

1^50 
3(l{iO 

3<]D4 

3{]20 

JD3CI 
3l}4(i 
3D7fl 
3«Sl} 
JICil> 
333D 

316^ 



■5 TO 4 



6 TD 



7 TD B 



ff TO 



PH[«T 
PP]HT 
PftSlfl 

fRIHT 
PRIHT 
F^RINT 

PRINT 

ppryr 

PRINT 
Pfil*l7 
PfilifT 

PftlHT 

FRIBT 

PRIHl 

PRINT 

FS[ttT 

PfllrtT 

PH1H7 

fRIBr 

PRINT 

PRINT 

PRINT 

PS INT 

PHl«T 

PFrlflT 

fRINT 

FRjNr 

PRINT 

PRINT 

PRINT 

PRLNT 

PfimT 

PA3HT 

PRIfli 

PRIWT 

PRINT 

PRINT 

PRINT 

INPUT 

QN Z 

PRIMT 

GOTO 

H-t5 

LET ^=-2^ 

GOTO l?3l 

H=ffl 

B = -25 

GffTft 1?]l 

«■!: 

B^-22 
flDTD 1?31 

R=-30 

PRINT 

PlflHT 

PRINT 

PRINT 

^fflHT 

PRINT 

PRIMT 

PfiLMT 

PRIHT 

PGIilT 

INPUT 

IF fl?fl 

JF Rl'i 



TD 
TO 



7 IS ^ gTRfilGHTftUft-r ffOfl IfiEflig LONB* 

3 IS ft CURVE 20a TftRDS LDN(r 

THE BRErtJLftllftI" SPEED RflH&E IS 01 [U 1 0^ NPH^ 

4 ES A STRj4 36HTAllilY 5130 ri^RLS LD^IJ" 

IT ENII& ftT POSITION ISOO Vflft&S FRD*I GTAfiTIHD^; 



5 ]S A HfilRFIN CUfi'JF lOD TftROS LBNff- 

TftE BSEflKrttfflT SPEEff RflHQE l^ 2^ EG 35 HPh" 

IE fiNDTHEfi 3TRft]GHTftUft5" Jl>0 t^HS LU+IG" 
IT ENDS AT fOSUia** 1?0U rflRBS EfiOH THE BlilE 
? 1& A SET DP '^' CURVES 5flO TARD5 LOHG^' 
THE SPEED RflNQt [% ^fl-IlD HPH" 

15 THt T5HflL STKriIGH FfttfAV QF 40^ TflR[?5^ 
IT E«TtltS THE LiiST CURVE ftT 2BflO VftPB3'^ 
? IS THE FlrfAl CUSL'E QF 400 TAElDG" 
THE frREflKAUAT SPEED RANK 13 SO TO ?6 JifH" 



"THE TOTAL LENOTH OF QNE LAP H iJOO tAftDS" 



TO HDWTROL TU£" 
CURVES UIJ-L BE"; 



■IH^R[N3 THE STRftlGltTflUflrg TOU UILL BE ABLE 
'ACCELER^TlDN AND BRAKINfl DF THE £A£. THE 

^ TAHEIf' 

"AT U«Art'J£R SPtED "VDIT tmR THEtt." 

"BELOlt THE BfiEfltLAllA^ SPEED. THE CUPL-E^ ftAT D£ TflKEtt LIlTH "j 

"NO DtFFICDLTI," 

"A&DVE THE FftSTEST SPEED l«D[CATED, TDD UILL CRIIIiH' '" 

■UlttflK TrtE SfEED RAMQEr THERE IS THE Ffl3[!IHUTt THAT "JOU' 

* hlDHT" 

■LOSE T(*IE OR SFEED BT ^LrNfilttG UIDE lift Bl ^FliirilSG QLJT.'^ 
"THE filSTEl: TDU TflKt THE CURVES^ THE fifrErtJEft THE RISKS--* 
"rtWD T«E L£5S THE TlhEHir 



"TOUfi TA3*: IB TD TRANSyEflSE THE 
'^UTIHGUT CRflEHINfl 



FR^Ck m A niNIriOH DE TIllE" 



-^OEfR tAt PIfrt K OifE i3F THE FOLLOUlNas 

*1. PflRSCHt" 

*?. FERRARI' 

■3. HIiSfRATr' 

"4. LDHS FOJ^P" 

-UHICfi C^^C UOULD rUtP Llti^i 

I 
GflTfl 1?2flp1?23pn?iJ?:9 

"UE P[?H"r Hri^LiL TIViT CAR 
S?1J 



[ft STOCK. PLFiASe CttQOBE AQHH-"; 



VQUR CftR HAS A HAKiniln flCCELtS^IlOW f>f " !fl ; ^'HPtt/^EC - " 

AND fl flftllnOH BRMlNfi QF ";B;"HPtt/S£C.*' 

rOU tfilL RACE |lBA[i*ST EH#E OF TMF FOlLDUINOjh 

t. U.S. PDSTAl DELIVERT TflUCK" 

2. 197^ BEAT PDHTIAC GTO" 

1?ii IfEU U^fO FORD HUSTANG" 

LDTDS FflftD" 

1?7^ FERRIiRft" 

THE PHTSECS SUfERCH-lRMD LIQHTBEAil SPECIAL" 
GHE DPPG^EitT BT E^TERIflQ NUHBER"! 



"3, 
"4. 

"4. 



"CHQOSE 
Ira 

THEN 1?^ 
CAR 



THEK 1946 



BID TOU SflT' 



PRI*IT "UHICH 

GQTfl l?41 

LET ft=2*ni-5 

GOTO l?49 

LET «=2.5E-tOfl 

LET ftp^?^J*^«*J,^10^*?*RrillU^/100 

P^IHT 

REN 

REH DE0lfl ThF HAtE"! 

REH 

LCr J»1 

PirlilT "ELAPSED T]ttE' 

PtMT ^ELEflATEON- 

PftlffT * SEGDH&S^" 

FKIffT 

):=0:S^0:T^0:T?-0iS1"0 

fLEH 

IF J^ff THEN 3^00 

PRINT 

PRINT "CQJIPLETED LAP" ; " pELftPSED TIflE" ;FNT C T ? ; "SEC." 

PRINT "rCDR OFFOHEHT FINISHED EN ^' ;GU/R; "SECGHDS* 



■5PEED"t'"'*"5Si rtflH-^ -[JPFTJNEN r S"", "ftCC 



I'ARM",*' POSiiior 



3li7 
3ldB 

31?0 
31?1 
31?2 
320D 
32D] 
32l>Z 
3203 
32ID 
3220 
3139 

3?50 
3Z^0 

33oe 

3310 

332fl 
333D 
33A0 
33SD 

liiH 

3370 

ijao 

3400 
3102 
2404 

l«i 
341D 
3420 
3430 
3440 
3450 

3SID 

J510 
3530 
3540 

3^00 
34H 
]j2<i 
370fl 

J72l} 

acoi> 

SCIO 
8C20 

3«30 
^«4D 
SC50 



LET KI^FNTCTJ-tffl'K 

IF Kl?<i THErt 31 ?1 

PRINT "CflNefrflTUlATIOIfSp YDIJ HON BY ";-K1; ^SECONDS" 

EGTfl 0600 

f'RtJiT "SflRRf, IDU LOST Df \K1 ;"SEj:ilUD5^' 

GflTC SAOO 



32fl3 
";PNftCS^" 



■■;lNTtx 



^■jFriPfT]/' 



■;FfifLCS^" '^^IltTIX^" fiWlSH-'t' 



IJ" fNPn^>32{H3 TH£N 
PST«T ■ -SFIfTITf," 
GDTB 3214 
FRIHT ' ":FIIT<T>p" 

IHfUT Al 

LET ft=ftl/3.0454S 
IF AI^^O THEN 3i00 
IF fi1>"B tHfH 3300 

PRIHT "HflXIHtiPl BRflHIHC It ";D;^HPH/SEC'" 

CGTD j2;d 

LET T]^-&/ft 

IF TSJ^B THEN 3500 

LET J-lTXt-at:Tl-*rt/2t:Tl:tT1 

IF IfT.piJtl J THEN 3400 

PPINT "tm ^TGPPED";iHTcPij+ij-j:i);-TjiRBa FROii roiflV;jt] 

LET 5=0 

tET x=):i 

LET r*T+-TT 

GGTG 310D 

LET T<P[J*-1^-:f 

IF AOO THEN 3410 

LHT T-TtT/8 

S5T11 3440 

LET 51=5flRf^t^-^J«*t) 

LET T=T-(5-S1)/rt 

LET S^SI 

lET J^Jtl 

DDTD 8CJ00 

LET n=l-*S*D*fly?*:D*D 

IF I1)P(J+-lf THEN 3400 

LET r=TfD 

LET S^?*fltfi 

LET It^XI 

QflTll JIOO 

IF fll <= n THEN 3700 

fftlME "JlftTlJU^h riCCELEffATldM 

fiJ)ID 3200 

LET Kl-X+■S*D^-A/2*D■tB 
IF K1^PlJ + t] TKErf J4fl0 
GOTO 35D0 



IS ";tt;"HPH/SEC" 



RES 
REfl 
LET 
LET 
LET 



**:* SUD CUfiyE t*T 



SPEED" !rRrl(S?;"MPH" 



0peo 
aa?o 
a too 

BltO 
B120 
BIZ5 
G130 
UI40 
G200 
0210 
G220 
9230 
S240 
3750 
a ^00 
3305 
B33i> 
3^00 
0^05 
S^IO 

s^^o 

9000 
^fllD 
?fl20 
9D30 
?040 
'?P50 
VD^O 
9D70 
90flO 

9100 
9)10 
912D 
9136 
9140 
DE 



TOflK i:UR'JE UIOEt LUiV 



I = IflTU^> 

Ti=[p[j+t>-pun^s 

Gl="GaHCFaJ-6aJ3t:R«Bil) 
IF S>51 TffEff ^^00 

PRINT "Ct]RyE*;j;-J-i;", 

LET J»J+-1 

LET X=PU? 

LtT T=T*TI 

GBIO JiOH 

IF S>S14(F^il-ai).'2 THE" KOO 

LET T2=T1*RNDn J*,4 

PRINT 'SPEED SH CJRVE" ;f«AiS> ^'flPHp 

fSlNl F*fT(T^^;"£Et-- 

LET T1=TI*T2 

£DTQ GO^O 

IF 5>FCI? THEN 830{l 

1,ET a^=?-S*fi«D{n*.? 

LET n=Ti*5/S2 

FRINT "SPlfH Dur AT";Frift[B?;^'HPHp LAST SPEES flNff TJftE* 

LET S=S2 

GOTO 

PRINT 

FRINT 

REfl 

FRINT 

PRINT 

INPUT 



LOG I 
fGUR 



CQrtTRDL flT'';FHflf3)rfl^^^ 5"0Ufi CAR CRASHEIt* 

DPPOflEltr FifflSHCP IN -;B2/[:;-SECflriDSi" 



DG 
1 



TOU UISH TG TRT ftfiftlN^f 



IF LEFT»tii*p(| = "T- TftEM 19J0 

R(h 

O + BOD, Tg&0tl5&(] pliOOp 1 ?00p 2400 ^2300 t32iJ0 

BSplOO 

20p3S 

?l>p1Tll 

5ilp?C 



»ATA 
BATA 
Di^TA 
DATA 
Dfltfl 

Rtn 

SATA 
BATA 
BA1A 
DATA 
tliTA 
BATA 
lATA 
BJ^TA 



0^1^3j9p2lT39pi2pa7t120p15ip1?*f244t293T331,410 

479j550pfi25p700p753TeOOpB47pB?4p?4^,??Ox10?OJOflO 

1135p120Dp12i0pl330O3B2 J425 pi 470,14^0^1505, 15^^ 

l53?p154Bp1543p15r0TE3l2fl4fOfl6iJ|lii1Gj1i33,17ia 

]750pia0l}pia50ptG90^l943O'??r205i)p21P4p 2057,2210 

22f4p23l7p2370,2420TZqD0,2533p2ft00,2ii?0,^/:3t?/6Df«V99pID30 

2fffi^2e9?p2920p295lj29B2j3O13p304^,3075j3lOjij3137,31iie^3f9S 

epooo 



Guess-H 



Many, if not most, two person game? 
that are played on a computer are 
based on fixed rjles that assure that it 
one player u&es these rules and a 
rational playing stralegy lf>en that 
player wins. If both players use these 
rules and rational playing strategies 
then the winner is usually determined 
by who goes -first Tic-Tac-Toe, Balnum 
and Even are e>fampleE of games of this 

type. 
A more interesting type ot game is 

one wbere the playing strategy is of 
mixed type. This means that the best 
move, in most cases, depends on what 
moves have already been made and a 
player can only determine the 
probability of the besl move. Standard 
card games (Bridge, Poker etc.) are 
usually games of mixed type. 

Most two person games ot mixed 
type are either so complicated that the 
best strategies are not known or they 
are so simple thai they afQ not in- 
teresting to play. The game ot GuessHt 
Is an exception to this pattern. The 
element of bluffing, which plays a 
centra! rofe in this game, makes the 
game inieresting. The optimal strategy 

for playing this two person game ot 



mixed type has been determined by 
Rufus Isaacs^. 

Thi& program simulates the game of 
Guess-lr. The computer plays accord- 
ding to the optimal strategy deter- 
mined by Isaacs. Lines 1740 to 1930 
gi^e instructions on how to play the 
game. The number of numbers in each 
hand is determined In line 70. (It Is set 
at 5 This is the value Isaacs used in his 
analysis of the game.) To change the 
number of numbers in each hand only 
the value of H in line 70 needs to be 
changed. 

To play the game in an optimal way 
decisions need to be made based on 
the win probabilities P(m.n) where m is 
the number ot numbers in your hand 
and n is the number of numbers in your 
opponents hand. The matrix ot these 
win probabilities is computed in lines 

80 to lao. 

To match the Optimal strategy of the 
computer some type ot randomizing 
device based on the win probabilities 

P(m,n) IS required. [See (1) and [2] for 
desciiplions of how to make and use 
such devices. These devices only work 
when there Is a maximum of 5 numbers 
in each hand.} 



The decision as to whether or not a 
number asked about by a playerwasa 
bluff is made in line 750. The decision 
to bluft or not when asking about a 
number is made in line 9A0. 

The program gives the player the 
option of going first. The win probabili- 
ty, P(5,5}, in this case is .53S. Therefore 
the player going first has a slightly 
better than even chance of winning 
assuming that both players use the 
optimal strategy. 

There are two reasons why bluffing is 
imporlani in any strategy. If a player 
never bluffs, then any "ask" about a 
number that is not In the opponent's 
hand wilt result in a loss since the other 
player will know that it must be the 
down number. A successful bluff can 
lead ihe other player to make an 
incorrect guess of Ihe down number. 

The program and description were 
wiitlen by Gerard Kiernan of Manhat- 
lanville College, Purchase^ NY. 
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flUEBS-TT 
■CmRlSEUUn, Nib JEI!S£] 



DO roll HAITI IS GJESS THE PDUK 4 JnBEIT'* NQ 
UB^I Unilf DO SOU tfftNT 10 tSK BBOUr* 3 
li HOT I>^ HI HiltIB 



la lt\a UftNT llfSTFrUCTIOIfS-T\PE l£3 QP (fl - 
1 1£3 

THE OBJECT Of TUTS EftllE IS TO GUES? Ml UHKHOU" HUHBEft 
CALLED IHE -BDIfN IftHlBEfl'. THE BfiPE iS FLi*T£Ii UlTM THE 
tJ4lhBER& I TD II . YQII UllL BE "'JEH A HAHtl tff 5 
ITAITDOIILT ftLEElEC tlllFIJEPS ^ETllCEN I f»lli 11 . TdC 
CDfiPUTEfl UILl HftUE A SmUflll VWH. tB£ DOUH HLIfBtti UlLl 
ftltifi n THE kUIIBER HOT in FTTHEfi PLflTEfl HANDS. 

YOU i*lTEHIffiTE ttDVEE JITH TifE COftPUTER. ON 4NT HOWE IH£»E 
fiff TUD DPTIOH^- nam THE HDUH VUltBER IP ABC ABOUT aOlE 

lUfEK t, PLH'Cfi tUEEBES HE LfQlUt NUPlWIf THE SAME STOPS. 

IF THE 0UE35 !3 CftflPECT THilT PLfl'EP tiJ>li-. 

I* THt GOESS JS UBI tOfltECT TmT FLATEI? IQSES. 

ai\ tilESTIONE ABOtlT IIOIlBf?£ TN THE OTHEfi pr^AYEPG HAND 
tlUn BE APSUEffEB TFTUTHrtlLU^ Ji fLfilER rtfiT'PlQFr' Br 
A^ITlfl- AfOITT A |flJIHE« IJl HIS OUN HAND, THE CaHPUltlT 
W[Ll. ^linETLHES liD THIS. -" ' 

BVPH LUCK 
Tout: Hfit^D 1^ 

n 2 fl 1 4 

no lOU lANT TO 60 FIPST^ YES 



DO TOll HflUE 1 
1 NO 



BQ tnu UAHI to OUESS THE BDUN KUPIHES-' l£S 

bhAl [IQ 100 THINK IHE BDtin HWH^ IS 
? 3 

THE DQUl NUHBfP IS Z 

YBJf GtlEEB Of i n COWECT - lQ]f UIN 

DQ 1'OU UfitlT TO fLAT H&AlN'^ <£$ 

YDITR MANIl IS 

7 ? ^ a 10 

DD lOU HANI TO OD FlfSf NO 



T iz$ 



DO taa uanl lo quebs the bouh ^jubep? no 

UHUT ffUdEEP DO IBU UfiNT TC i^5i: MflUT' II 
11 !S IN m NAlfB 






DD tOU tfSNT TO I1UE9S THE BOUII NUHBEB'' HH 
UHAT HtlllflElf DD rOU Ufilfl ED HSK AEDUET 2 

Z IS IV Bl hflHO 

T HO 

DO rOL tIflHT 70 GUESS ItTE DDUN HbKBEIt* f E3 

UHAT HO (DU TUllfK IhE ITDUN HUHBfl? IS 
T 4 

THE DOUlf HUHIEft T& I 

loup ejEaa of 4 la hot coRttci-iDu IQU 

DO IDL JfiHl TO PLUr AQAEN^ EIS 
DO SBL JBrtl IB PLAT flfifliri' 'fE9 

TOUP HAHA IS 

1 e n 10 ? 

JO 10 J UAIT IQ Oa FlBSTT ITES 

DJI TOO Ufllfr TO GUE^S THE BUUFI AQHBCR? NO 
tfWT lKin»EFr W TDS HANI TO ASH AlOUTT T 
I IS EH r riAHI 



He 10U fUUE S 

? TEa 



DO roi bMf TO eucss the nun huhbep^ no 

L^HT ItUFIBEl: OD TOO II4NT TO ASK AIHITT f 
T )9 IE Hr HdEI 



DB TOJ HAVE t 



DD 100 UAHT TO OUESS Tl£ Bam flUfllEP? 1E3 

UHAl ID IDV THIVH THE DOLIT riJFIBER 15 
' 4 

THE DOUn HUDBER: 1? ^ 

Yl^DP l^UESS DF ' IS EOT I^DltRECT-YOtl lOK 
UD laV UAH I TD PLAI AOAIirr HQ 

YIE PLAYEH 3 SAHES. TOU LOST S VOD USE 1 

BUEAE If 13» 



LUT 

1 PfflllT TAB<7a>'QirES^-ll" 

2 PRI|lTTi»B{?i»"tllEflTlll£ COPPUTIEG" 

3 PlflHT TA|irE>'llD'<EI9TQUE, HEU JEffSET' 

^ ffiiBT 

5 PUBT 
ID PttlttT 
2l> OI-1>:CI=iT 
511 AI-ETEktn 
7D H'S 

SO 9IE Pll{h,14> 
FDfl E=9 TO E 
PCK<4><I 

EEET E 

FBE I-l TO K 

FDE J-1 TO H 

P(I,J)"il*Jtf(J,I-lHM-f(J-l.n])/1l4(J*2Hp{J,I-lll 

p(j,i]"(in»i*a,j-i>ni-pii-i,Jt>>/ii"a»i)"PLi,J-iJi 

NEXT J 

HEfl I 

Z'll 

DTN U12],ECZ) 

FElET-BO lOU JliET lESTRUCTlONS-TIPE TEB DE ECl* 

IIIPUT Al 

IF A»":-YE9- THE*f 17311 

IF AlO-W TIEA ?I0 

FUTIIT 

9>01<] 

FOR J=2 TO 2 

EF'I J 
STDlT-.|>:^':fl:P=Q:L=0 

GDSUS Hit 

SEE HM) 10 HtHI= COdP HMO N1H*I>-T0 EfZt' DTIIER EAEI 

0=<ZJ 

PlflNT'lOUR EAED IB* 

PCINT 



56 

rec 

1)0 
MO 
MO 
HO 
1JD 

aa 

lifO 
190 

T« 

2ce 

210 
220 
230 

2ia 

SAO 
270 
210 

3fO 

J10 
320 
330 
340 

3 JO 
3»0 

:i7D 

3f0 
AflO 
410 
470 
4J0 

4 JO 
430 
460 
47C 
410 
4*0 

seo 

910 
570 

mi 

5*0 

sao 

aao 
B?o 

tSBO 
AOO 

aio 
b» 

64D 
d^O 
itO 
A70 
6641 
AfO 
7fl0 

720 
7l<t 
?*i 
750 
?40 
770 
700 
7t* 
BfO 
010 
B70 
B30 
0(0 



THEN 
TEEN 



470 
3fO 



670 

e»o 



FOR I-Et| 10 

PBIET IHl*l 

NEXT I 

piriHT 

PIIHT 

P»IJIT-B0 TOO iitW] TO 80 FIBBT'f 

INPUT Hi 

It Mi-rFS- 

IF mo-EO- 

K-l 

sort! 490 

K'O 

N»M-P 

PIIIHt 

i' H»nNTtE/a>l'? TEDi 

PRiJfT 

PRIHT-IO rod UliET TO QUESS T« ODUIT riJEIFR-- 

TNPUT 41 

IF A<«-TES- THEN 1250 

IF AfO-EO- THEN S30 

priNT 

PftHET'ENBT irUHBER DD fDU UAET TO ASE ABDUT-; 

INPUT E 

FOt I<1 TD I 

IT l'Qn> THEE £51 

HCKT I 

BOTD fr7e 

PItlET E;- has asked before TET AQAtH- 

GOTO ?ao 

FOP J>l TD N 

IF Jf<J»-E TMFN aOO 

HEX I J 

PHIJfT 

priht;-is Hcr m et xfiED" 

IF N^'O THEA 1440 

JF N^O THEN 1440 

t" Lh^l FlP(H,N-ir'E«P{l1''l,N1l/1liffl-']}.prETl»-1}> 

IF EEDirKT IEEE 1 390 

Q051II 12?0 

IF IM'PliI TEEN I4i0 

SOTO 4Be 

FRIITT 

PRIJII E:-IS IE rtl HbfD" 

C-C'l 
GQ^UB 1720 

GOTO *ao 

REN COflP SGl> STARTS 
IF T(JO TEEN '410 
IF N-Coe TEtN 890 
GOTO 144* 



70 



?¥0 
■^20 

970 



mill 

IfllO 

JJ7J 
ItflO 
10?0 

11 DO 

lllfl 

USD 

1130 

IHO 

1T5fl 

11^l> 

11715 

I ISO 

1190 

1700 

121II 

1?2l> 

t230 

1240 

1750 

12A0 

12715 

t28D 

T290 

UIO 

1J2fl 
13315 
TUD 
1330 
13&0 
137U 
USO 
li9* 
IlilO 

mo 

1^70 

1440 



IF n-p-;>0 THEBAIC 

OOTO 14^0 

IF [2*H-3)-lPti;K>a THEH 130 

BflTD CflfiO 

EEfl RMD &:CISIDX TB BLUFF OR IWT 0» 

IF ftHDn5M/{1-+L*l+l>*F(Hrn-l3^ THErt 

fRIHr 
ft-INTCH*MIin>^*t 

POR J=1 TO I 

IF H[ft?"UCJ5 THtN ^^-5 

he):t j 

C=CM 

INPUT fil 






FGR CriffiO 



gOTO 
GDSUB 

PRINT 
PEIUT 
INPUT 



I17<» 



1^0 TQU HAiJE "Elllfll 
A* 
[f fl*='*TES" THEH I1M 

GDTD 4^1} 
C-N^A3 

QQ^US I2» 

CD7I) >^B0 
A=INT[CHtn*RNIt1»}t(Ht1} 

FQFC J=1 TB i 

IF *l(flJ-lfCJ5 THEN CDTQ 11?B 

UEKT J 

fL£TJIIif 

L-L*l 

RETMU 

PR [NT 

FRINT-UblBT Dtt TOU THIK THE BOLW MUfffltW IH" 

INPUT B 

PIITW 

PBINT-THE DOUH ^lUMBEfl TB";N<:) 

IF B*UC7) THEN l3^i> 

PRItiT 

fPlNT-fOUi: 

C1=-C1 + 1 

BDTD 1320 

PEIIIT 

PHiHT-rouR ei]Es& BF ";s;-is ciwrlct " rati hi 

60TO 15?D 

faiHT-l TttI«K 

6"E 

DDTO I^BO 

Plll«TNi*iff"ll*S *IOT ft BLUFF 

Q=NiA] 
ODTD 14R0 



liUCSg BF-;Br IS HOT COW^ECT-VDU LBSC* 



TQll UEEE HOT BiUFFIWG LIHEIf TQEi ASKED ftBOUT*;£ 



145D 

1449 

1470 

]4B0 

-14?0 

15515 

1510 

1520 

1530 

TIM 

1550 
1^60 
1570 
It^BO 
15?0 
1400 
U1Q 
1^70 
U3il 
U40 
USD 
I^^D 
1fr70 

ueo 

UfO 
tTOO 
1710 
1?70 
173II 
1740 
1750 
t760 
1??0 
1?B0 
^7B5 
»7?i> 

laoo 

I&10 
U£0 
IflSD 
1640 
1S50 
19^0 
1B?0 
1BB0 

ia?o 
itoo 
1fll> 

1120 
1130 

1V40 
1930 
l^fiO 
If 70 
OK 



IMS UfiOKC. TOU UIH- 



BflJO 1480 

casus 1170 

Q-KCA> 

PRltil-I GUESS IttE IDiW NUHSE}' lE^e 

IF i;=«CZJ TWtN t^?0 

PRINT 

ffflNT'^TNE DOUH HlfUffiff ^S■;H^Z3^-^ 

PRINT^'BQ ^OJ UAHT TB PLftI flCfllH-J 

IHPUI M 

IF Af^lES" THtfl rSO 

IF AK>°HO- THEN 15?B 

PHLHT-Tai] PLAlE0";C1*'*fl*HES- TBI! LDSr-CTi"TBJ UBIf"6H:i 
STOP 

pp:nt-the dovm hun^ep lE'ritzari ^^ coRRCCT.-.rau lqbe- 
i:i=ci*l 

flOTO 1^215 
fDB EM TO i 

NEST I 

FOR >1 TQ I 

P-I^rtRKBMHItZtlH»tl 

O^M<R} 

HCIl^J 
NEUT I 
KE-TUItN 

PRINT'^THE UUJECT Gf TH15 GAffi IS TO CUESS AN UMHNOUH KUHBEft" 
PRTNT^CALLEB THE ^nnUfl «U*IBEr* THE Oflfli fS PlftTEH ULTH TW 
PRIilT-*IUIlBEff5 1 TB";Z;** TOJ BILL IE eiVEil A ^tAH» OF "JH 
PKlRrFtfl**DOHLr ^ElfCTED MBRBEFS BETUEEH 1 rtH|''l7;V THE ' 
PRHT-CflflPUTfff BILL HflVE A SHILflR HAN]). THE BOBH NOMflER UU_L " 
FRINT-ftlUftTS BE IHE NUBBER NOT IN EITHER PLflVER HAflDS." 

PRINT^TOB ALlfRttfrTE flBVES UlTH THE COHPlflER- ON ANY ftOWE IHERE- 

PRIHT-^Hlit TUQ QfTiONL- GUESS TrtE HOUH ttBHBEP DR ASK liBBUl SDPE ' 

PftlKT^^HBHBtRH'* 

P ff T BT 

PR]rfT"UIIEIf P FlBlEf GUESSfca IHE TlOUN rfUH&EB TWE GlinE 3 TUPS." 

ffflNT-TF THE fiU£3S IS CORHECT TH*iT PLflfElf UHfS-- 

PKIHT-IF EHE GUES5 13 "01 tORPECT THfl ( fLfllEB LD9£S," 

PniHT 

PI|[(l1"ftLL OJEMIQUB fll&UI SJnBEfS IN IHE OlMFf PlflVERS HSMD" 
PftlllI"IHlST BE flUBUEItfl IHJTHFULK. H PLflfFR HflfBLIifF' BT' 
rSJIfT"fi3K]IIG fiHDdT A hlfllBEf: It 1119 HW HflHD. IH£ CfUIPUIEP- 

pRTifT-uiLi sanmnEa no ihis.- 

PRIST 

rfilNT-fl VJPBEE flBl Bt flBKEB ABOUT OlfLV ONCE," 

PI^EilT 

FHivrgijiiD Lucr- 
eoiir 234 

fdD 





Your radar ^t^tion picks up an enemy ICBWl heading 
your wayj telling yotJ ils coordinates {in miles north and 
miles east of your location). You launch a surface-to-air 
missile (SAM) to intercept it. 

Your only control over the SAM is that you can aim it 
in any direction, both at laundi^ and in mid-air. U^ing the 
coordinates of the ICBM as a guide, you INPUT the 
direction [measured CCW from North) in whldi you want 
the SAM to travel. 

At the next radar scan one minute later, you are given 
the new coordinates of the tCBM, the coordinates of your 
SAW1^ and the distance between the two. You can now 
make corrections In the course o+ your SAM by entering a 
new direction. 

YoLL have no control over the altitude of your SAM, as 
it is assumed that it will seek the same altitude as the ICBM. 

As the two missiles draw closer, you make adiustments 
in the direction of the SAM so as to intercept the ICBM. 
It's not easy 3o hit, because the ICBM is programmed to 
make evasive maneuvers, by taking random deviations -from 
Uie straight line course to your location. Also, its speed is 
not known, although il does not vary after being randomly 
selected at the start of the run. 

You can destroy the ICBM by coming within 5 miles of 
it, at which time your SAM's heat-seeking sensors will 
come into action and direct it to its target. IE you overshoot 



._j 



the ICBM It s possible to turn the SAM around and chase 
the ICBM back towards your location. But be careful; you 
may get both missiles in your lapn 

There Is also some element of chance invoEved, as 
several accidents have been programmed lo occur random- 
ly. These can worl^ for you or against you. 

Some ways to Improve and expand the program are" 

1. Operator control over SAM speed: In the present 
version the speed of the SAM is randomly selected by the 
computer at the start of the run, and remains constant 
thereafter This often results in overshooting the ICBM. 
Modify the program so that you can input a new speed 
(within limits) at the same time you input the new 
direction. 

2. Three dimensional version: Have the computer print 
the att/fude of the ICBM, as well as its coordinates^ The 
operator will then have to IPJPUT the angle his 5AM is to 
make with the horizontal, when entering the other quanti- 
ties, 

3. Extend to all Quadrants. In the present version^ the 
ICBM approaches only from the Northeast. Vou can 
e?<pand this to include approach from any compass direc- 
tion. 

This game Is derived from a program submitted by Chns 
Faico The vi/riieupisbyPaul Caller snd originally appeared 
in Cre^U've Compulmg, May/Jun 1975. 
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ic&rt i SAH attu UQ niiES j^FjiRr 
If a ?^(i A& u 

11] BM i Sfln JSOU ^^t HILES flPfttil 
?i)0 e?i> 35 lit 

Ife^ 3 SAi\ NflU 715 HUES APAP9 

lU ai5 44 117? 

]CB4t ^ !j^ft MDU ^]J fllLES APART 

iai> ?43 72 15ff 
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110 295 lli 4^8 

tflO friili. l"OlJfi SAH F£LL TD THE GEflUHIJ^ 

DH Ti>l| VANT rO PLAr ifDRE? i'f HR ^)'^ H 
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M fRE(JT TABf13>;"ilOHIHSTIJU|fp tJEU JERSEf' 
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T ?S 
? CD 

I 03 
T 80 
^ 70 
? 75 
? SO 
7 70 
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WO 
T75 
^30 
1?0 
2Di] 
JDS 
210 
22^ 
23D 
2^0 
^SO 
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2'5 
2&0 
270 
JtO 
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340 
35C 

34{i 

41D 
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4 SO 
44i> 
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4Bi> 
49[? 
SDQ 
51i> 
&2i> 
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54 D 
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5?D 
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P^IHT ^ ItLSSLE *; 

PilHT * Sjltt 

f-RINT 'fl[LSS\-n:LE5%"HILE3'\"flfLE3"/HEADlfH3- 
PPINT '=ifO"^TH"H'EfrST","lfDSTH",^£j=i3T",'="'" 

PRINT " — " ; 

P R E N T " -* 

fOH «=1 Jtl 3fl 

fRSHT T,X,rdS1^ 

IF J^^O THEN 55^ 

INPUT T1 

Ta*TE-^3?_29i 

i=IflT<ftMD[l>"2D0+l ) 

[F N?4 TiftN 2-^fl 

ON H DOTJ) J:^0,J5^r3lO^S30 

^lilNTtllt-atPSINfTI J?ifiajHTai+5UCD5CTE>J 

EF SaRC?;-^?*r^^?3 ^HEN 35fl 

trO!t-S 

GSTO 430 

E^5QfilX*2+-Y*2}/10iSfl 

l = ATiffT;K? 

X^ I N T [ I-S*CQS [ T )+RN & H h :t204ft J 

VilNT[Y-StS:Mft}tft^Qcn420«fr] 

D"5aflUX-Xir2-*ir'Tt>-^21 

If Il=<5 THfN 440 

H^ENTCD^ 

FfrENt "ICBIt £ Sflfl JH]l^"; U; "ItlLES Afflflt' 

Jf£KT H 

PfllftT "CQilGRATtJLATIDNSE TdUR SAH CftHE UITKIN^'; 9; "HUES Of" 

PRIHT "THE IDStl ANEF HESTROtED [T"^ 

SUTG S^O 

fUltfT ''TEID BAB, TUU^ Sflfl fELL TO TJtE URUUttC " " 

Ppl«T "TOUR 5Afl &J:FL£r£tE& U fllEKilR"" 

fiOta 3i0 

M3*tT "GOD 

SOTff 3fi0 

fft5HT ^[JOfl 

BDTO 540 

PRIJfT "TfllJ EASi- 

PRlJfT "TttF ICEfl JU5t 

PR1«T "IiO TOU l^ANT Tfl 

INPlJT 1^* 

IF At^"T" THEN t3ll 

ENH 
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Inkblot 



INKBLOT is 3 program that creates 
"inkblots" similar to those used ir the 
famous Rorschach Inkblot Teat. The 
program generates these Inkblots 
randomly 30 thai literally millions of 
different patterns can be produced - 
Many of these patterns are quite 
intarasting and &erv« not only as 
conversation pieces, but also as good 
examples of computer "art/' 

In addition. INKBLOT is interesting 
from a mathematical pointof view. This 
is because INKBLOT actually creates 
inkblots by plotting ellipses on Ihe left 
side of Ihe page and their mirror- 
images on the right side. The program 
first chooses the ellipses to be plotted 
by randomly selecting the valuesa.b J, 
k and Q In the equation for a rotated 
ellipse' 



INKBLOT coufd be enhanced In 
several ways, for sxampfe aflowlng the 
user to specify which character is to be 
used in printing the inkblot. It could 
ha^e an option to pr4nt the 'negative" of 
an inkblot by filling in the area around 
the ellipses rather than the ellipses 
themselves. Finafly, it is possible To 
build jn a "repeatable randomness" 
feature so thar exceplfonal oufpuls 
could be reproduced at any tirne. 
These enhancements are left for the 
amblllous programmer to make. 

Program and description are by 
ScoH Costello- 
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r(it-i)C059^ty-k)sin6L' [ty-kjcosB- (x-i)slnQ|^ ^ " 
a^ b^ 



I 




> 



where a = the horizontal radius of the 

eflipae 
b - the vertic&l radius of Ihe 

ellipse 
] = the distance trorn the elfipae 

center to the ysxi^ 
k = thedistance from the ell Ipse 

center to the j^-a^is 
9 - the angle of rotation in 

radians 

Since [he actuaf method by whfcfi the 
program plots the ellipsfls Is quite 
complicated, it won't be discussed 
here. 
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IflKBLOT 

JIREATJVE CaflPtiriHG 
llMRlSlDUHp NEU JEltSET 
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LIST 

TOO fRINT 

PRINT TAB^^O^;■'CftEflTIvE CflflPUlING'^ 
PriNT TA£4Efl?;"i10RRISTl3UN^ NEU JlftSfV'' 
PEINT;Pft!«r;FRIHT 
RCH ttf NDRKS B^ PLDTTIWD EUIPSH ilNi TNEIfi NIABOR INAMS 
OIH A n2,1JhpB4il6h,A4a4> 
REtl *** CHEIDSE FltQil 5 TD 12 £LL?f$£& 
H=INTC9*RH[i{t]^4^ 

ftEH t¥* fliEArE SIZE, LQEATIflH AtiH AltGLE J»F M ELLI^^ES 
FDR L = l rc ft 

Aa^i^^j4^RN[>cn 

ACL^J^ = ^t5*RHIll13+2r? 
ft(Lt4}"U!^ff*ltM]42)-^2 
T^3.M15?*frNDC1 J 

ACLpS3 = Aap^^*Atl,p^) 
ACLp^^-aa^i^fACLpJ) 

JJ[lp12?=-2t:|i[LtlJtfl{Lt5f 

fl[Lp]jj=Aapri5^Aap4j-+#a^flj/fltLpif 

MEXT L 

fiEfl *** PRIHr TDP BMHERr B1 COWlAltfS 3i DOLLAR S1G«B 

91= ■■41411414111441414444 14144141441144)1" 

PItlItT lt1;B4 

PtE^T &4;B1 
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Jffil 
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4Jfl 
410 
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4»0 
540 
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5?iS 

530 
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550 
3J0 

SS{| 

AlO 

±30 
62V 
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d40 
A50 
i^^O 
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7311 
7111 
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74il 
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7»0 
DL 



EACH TIME T LOOP 



Ei^CH ELLIPSE IQ SEE 
3E PRINTED 



ffln "*■ IDOP f IS ■r-fOORDlflfllE flF FLffT; 

REh "i 15 EKECUTEfp A LINE IS FRlttVEJJ 

FOlf T=:7?.? TO STEP -(,fl 
Al^^il 

REfi **:* LODf E CHECKS THE EQUATIDM Of 
REtt If* JF ir INTERSEJITS JHE LINE m 
fOfl E=S TD fl 

^^■■r-4ap2^ 

f2=rS*T1 

T3iri*A4£p10h 

f4=fl*AiEp7? 

fl=<A(EHl2>fr4?7Jl(EpJ^-*C-^44ritFp11]jyA(E,4J 

C = (r2*ft<Efi3tflfEp^5-r3J/liCE,3h*lt2fflfE,5Jtft{E,am3?;j*fE,4M 

fiEB «* ft IS TKE flAMCAL IN THE 5TftNDflfil QUfiBRATIC fflRHUU* 

[r=BfB-4W(£,13}« 

IF n<0 THEH 4'0 

&'SOR(Ff) 

REH Mf FIN I UHIRE THE LIHE IHreff5(CTS THE EllIPM 

R]-IttTi-^B+R5y2/ft<Ep^i]t|> 

IF [!1>31 THES 6?l> 

R2 = I«HCR-B^/;/IHEpt3?] 

TF RZd THEB iTO 

IF R204 THEN fi30 

RZ-34 

IF R1>0 THEJ1 dlO 

KEH ttT fiLL IH THE LIflE UHERE IT tfiOaSES THE ELLIPSE 

FBC JiRH2 TO «2^2 
fi1-L£FTHM,J-t}+-»'1* + RIQIfT1ffl1,LENfi^ll-J] 

HIXT J 

NEXT E 

e£n f"* fRIHT LINE 

PEriiT A1; 
FQfi K-3i TO 1 STEf -1 
fRlNt niD1[A4pl[pn; 

NEXT S 

HE XT T 

REfl *** PFTltfT BOTTOtI iQ^DER 



PRINT 
PRINT 
EHU 
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Joust 




^n this program you are a medieval 

knighl in a jousling lournament- The 
prize to the wi nner ot thelournamenl Is 
the princess' hand in mernage. To win 
you must beat four other knight$. the - 
gold knight the sliver knight, the red 
knight, and the fierce biack knIghL On 
each pass of your opponent you must 
select one of eight different aiming 
points, such as the helm^ lower left, , 
face of shield, et ceiera, and, based on 
yourairning point, you mayselectlrom 
three to six differeni defense positions 
such as a right lean or shield low. 

As you proceed in the jousting ■ 
TournainenT Ihere are dilferent in- 
terrrtediate outcomes such as getting 
knocked on the shield, breaking^ a 
spear, and so on There are also some 
outcomes which end the contest such 
a 5 your getting killed, or getting 
knocked from your horse. 

This program was conceived and 
written by Alan Yarbrough. 
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PklHT TfiB[1Sr;"mi[ftIST0Ufl^ 



COHPUTIHD' 

NEU JEHSET" 

PRI«7:PRIHT:PRI«T 

INFJ]T"miAI 15 "rClUf! IMHEt PLEASE";Af 

fRI«T"SIR *;A*;\ TDU ARE A hEBIEyAL KNIEHT I* ft JUU5TIH0 TOUBHfiftEUT . ^ 

PlflMf'^THE PHli TD m mifrtElT ES THE PRINCESS-^ HANS li\ NAREIAQE." 
"TO LJNp tm HJ^BT SUT FQtfR OTHER KNIJSHTS." 
'TO JOUSTi TDt Pics: AH JllftlliG fOtilT fOft THE l.ANCEp*' 

"AME THEti Q#E OF FRflK 3 TO ^ BIFFEREKI PCS31SLE lEFEilSE PDJITION^/ 
■THE AEilIhfi PCINIJ ftRt;" 



1- 
2- 
3- 

5- 

i- 



UPPEK 
UPPEft 

IJPPEfr 

LOU£if 

lOU£)t 



LEFT COF 

itlMl_E" 

RIQHT" 

nCBBLE^ 
RIGHT" 

SHIELC" 



SiEfJ-HV 



IF Ti3U BRtAK A LAKCE 
GGDU LUCi:, SIRJ" 



fllVeN AttCTtiEFlH' 



fSO, 11D0t 1250 

TO THE FQUR JOUSTS^ 



PRINT 
PHiiT 
PRINT 

Pfi]*il 

p»:fii 

PRIST 

PRINT 
PRINT 
PSifl] 
PRm 
INT 
PflNI 
PRINT 
PRINT 
PRINT 
PRINT 

FDft A * 1 Tfl 
OU A aOTQ 
REtt OFF TOIJ 

R£il 

PRINT -th]? 
GOrQ 1400 
PSINT "THIJ 

sure] 1400 

PRINT "fOU AfrE 

&11TD 1400 

PSINT" *THI5 IS TOHR FINAL TEST " ■ 

Pfiirr ''IS rauRsiM tkis fight is 

LifPUT "tr^^R AlNINe P0INTC1-B1";S 

IF £ <1 C^ ^>R IHEA 14013 

FRIffT- "TOlf flAf use OWE OP THfSE BEFEN5ES:- 

DIf 1 eOTO 1S50, ItlOt S?aO. ISSO^ ISSllp 1750p t55Dp l?:hD 
PRIHT " 4-STEAIIT SEAT* 5'SfllELD Kieil, fi-SHIELL LOU." 
GDTO ^DOO 

PRINT " J'Ltft LEAN. *-$EEflIlT SfAT, 5-SHIELB ItlffHp i-SHlELAl LQlf,^ 
ODTO 2^00 

PRINT " 1-LOUER HELB^ 2-RIGHT LtAi*, S-UH LEAN^ 4-ST£AEiT 5£flT, " 
PHlflT - 5-£*llES.Ei HlGMp 6-SH3tLIi LfliJ." 
ODTO 2D0O 

PRINT " 2-RI6HT LEAil p 4-STeAirr SEflTp 5-SHIELIi H15H, i-5HI£L0 LOUJ 
£DT4^ 2D0O 

PRINT " l-LOUEH irtL*lT 4-STEADT SEATf S-SHlELD H|CH, 6-5HIEL& LJIU.^ 
INfUI 'UI^AT IS TCJR CHOICE"; C 
[F = tflTlftBli[lHS> * T 
GDTO ^150^ 22^0^ 
?*DOt 



]E TDHR FIRST JBUST. TQU ARE OP ASINST THE ODLD irrtlCHT.* 
13 TDUE 9ECDJCEI JOirSI^ TOUR OfPDf^NT IS THE SUHEH KlfTQHl.- 



ftDEilG UEIL' TCIffl THIKEi JQIJST IS AQftlKST THt fifD i^NlCHT,- 



IF rOl^ UIN fUrS ONE THE PftlNCE^S' 
Ji^AItifT THE FIERCE BLACK KNT^HT* ■ 



ON 
on 
on 

ON 

ON 
ON 

ON 

DN 
ON 



6UT0 
8UT0 
GOTO 

tiJTO 
8PT0 

aoTO 

SDT[? 
£DTO 



2050 1 

2T50t 
2^50, 
2750^ 



24&flp 
E?^Of 
2fli)0T 
?i&OT 

:HOt 
2fi5D, 

2ft50p 



225(3, 
2fr00p 
!tOfl, 
2fi50, 
?7^0t 

2?50t 
2B50, 



2300, 
^?00^ 

2750 p 
265{p 

2?10, 
2^50 p 
2750, 



2350 p 

2S0Dp 
^7S0p 

2?50t 
2i5llp 
2&C]4f 

2B5U, 



2400 p 
26Cl> 

2?00 
2BQl> 
2750 
?7W 
2450 
2750 



245D, 23fl0 



75 



2AJ0 
2750 
2990 

2as3 

2?5D 
3951? 

3300 
3300 
J40CI 

3400 

JA50 
3?flO 
J?50 

3eoo 

3130 
3f00 
3t30 

m% 

^000 
^05D 
410{t 

4200 

4]l}0 
43^0 
4J30 
4359 

4(oe 

4430 
4SO0 
4550 

at 



FRIHT ■«£ 

FfllKT "HE 

PftlJfT "HE 

P(|[41T "HE FtAS 
S^SiGQTQ 3000 

Pfi[|ir "ME Hl^S 

PRIHT "H£ HAS 
E 



flISSEO TDIti":S=0:[;aTCi 3000 

HIT TOUR SHIELD BUI IT GLAHCEO OFF."TgiO±G(lTa JOOO 

KNJlCKEIi OFF TOUR HELir;5-0;SDTD 3000 

frfiflfcE ril5 LftlfCt."lS-i>tEDrD 3ln>0 

UJiSEflrEB "reucTHiD'j-ss^sittoru joot 

BtDHEN HIB LAifCE^ INJUHED AiHD UNSEAT^Q TD([ ^OUCHi?" 



[MJlhED AJ^H UNSEATEB TQU I l^nASHi >" :S=5: BD TD 3000 
BEDHfN il5 LftNCE AN[E UN5£flt£u TOU ^CLrtNfli>":9=5 
[Nl^f!NSM]tAh -t 1 
II Gam 310CI, 3150, J?eOpJZSOp31CH)p3aO0p^1i>0, 3300 



[F £■=* TtJEH 3000 
IF E<3 T"H£H 30l>0 
BGTQ 3JSD 
IF E=1 OR F=i 



ELSE 
ELSE 



3350 



THEW JO DO ELSE 3130 



IFr E = 

3400p 
37U0p 
37aOp 
3700, 
3e00p 
39l]0p 
]7flO, 



S TitEJI 3000 



345{i 



3100 p 
3S50p 
J?OD, 
3450 p 
3ff5fl, 
3?00, 



MI^SEIi fJIH 
HIT HIS 

KifDCKEI 



35 00 J 
3?50t 
39 00 J 
3750. 
39^0 J 
^050, 
40D0, 

missi 



-= 2 
&OTD 
OOTD 
ODTO 
BOTQ 
&0TO 
&DTD 
&OTD 
-TOU 
"VOU 
"TDU 
"TDU 
"TflU 
"lOU 
T^5:G0TD 4S00 

^GIMT "TCJ INJJRED AMD UNSEATEth 
PRINT "TOJ BRAKE 10U*: LAHJIE ftUT 
IF 5 = T AND 3 = THEN 4^10 
IF E = T fiOTO q4D0 
JF 3^T &DTQ 4300 
IF S>T BDIO 4330 
fRIWT ^YQtl HfliJE UCN 1tfl9 



IF 
Off 
Art 
Off 

Off 

Djr 

Qff 

PRl*fT 

PRI^T 

PI![|fT 

PIlLliT 

PliENT 

PRINT 



3550p 

3J50p 

3?0flp 

3H50p 

3?50p 

3?50h 

3?00p 

?":T=0:GOTO 
GHlfLD B\^^ GLj^HCEB OFF, 
QFf HJS iiELH"[CHEERflU" 



3fi00t 
1350 T 

17 00, 
3350^ 

3350^ 



^05 Op 37^0, 30« 
375flp 3?00, 3750 
JESOp 4050, 39O0 
4O30p 3?50t 3eM 
J?50p 3750, 3950 
3fl50p 3750, i03O 
41011 

;T-OiODT0 410* 
T=0:GOi[) 4100 



Sf:OK£ \DUR LAHi:E(i:fiACK.^,J-;T»0;Cil]TO 4100 

UMSEIiTED \t\i\ UDUD CHEEP? AND HUZZAHGi n":T>atQOTO 4l» 

BROKE ^OUFr LANCEt BH^ U*l5EATEIi AND INJURfJ TUyS FOf." 



TOlJfi 0PPa«ENT.**:>5:C3Ta 4100 

UNSEAT EB TOUR BfP0MEHT.''cI^5;GU71] 4100 



JDUST^*:PRIHTtBOTI] 43?0 



30TO 

PfllHT 
PRIHT 
PRI**I 
PRLHT 

EMD 



45^0 



MOPE YD3ft INSUFtftlCF UA& FAIt UP-^sBflTD 4500 
LOST. AT LEAST TOUR ROVO! IS IHTRCT, 'iQOTQ 1^00 

TO TRT A3AIM.":3DT3 1400 
-SDRJil, BETTEt LUCK HEIT JjlllST , " i [jD T D ???¥ 
-HDQSATL TOO ARE IRE UIHNEfl, HERi CONES THE B«lMi" 



■TDO 
■TOO 
■YDtJ 



p \0U LA^Th 
p TOU £3TR 
ARE ffO^ SEj^BT 



ffU«l 



JOUST 

CREATIVE CDHPUTIrlD 

fl3RRI5T0UHp HtU JERSET 



URAT 13 TOUR HAilE, Pl£ASE^ gjEl^ 

5IJ SIEVE, TDU AJtE A F^ElHEVAl KNIGHT ]*f fl JDVSTIHO TQUItNANENT. 

T*IE PRIZE TB THE LHJTNE^ IS THE PRINCESS^ NAJfll EH RARRIME. 

TO Ulffp TOlf HU3E BEAT FDJfR DT|tER RfflONTS. 

rO JOlfSTp TDU P[CX AN AlilJNA POJ^^T FOR THE ifi^Cl^ 

AHIi TttER tK QF FROfl 3 10 A BlfFEEENT fOSBlBLE HEFENSC P03JT10HB* 

TBE AINING POINTS AREi 



SHIELIJ 



1- 


hflu 


■J 


UPPER LffI COF 


3- 


t]?P£R RipCLE 


4- 


UfPEfi ff^GHI 


5- 


iOtfER LEFT 


4- 


LOUFfl 1EIIBLE 


7- 


J-DIIER RLLjflr 



3- BASE OP SHIELD 

If TBI] BREAK A l^HCE QR LOSE ft HELHp TQU MILL IE SIV£W ANOTHER. 
OdOD LKlj SElTi 

THIS IS TAUR FIRST JQUST. T3J ARE [JP flfilNSI ENl ODLI KNIQHT. 

VGUF^ ASftlMG PDINTn-Sl? 4 

TgU dllT U^E ONE ffl^ THESE D^FENSESi 

J-RJCHT LEAtfp 4-STEADT SEfll, l-5iItLD HlBHp i-BHIELEi LUU- 
UilAT IS TOUR CHDICE* 2 
H£ flISSEB ^D3r 

TOU JHSEATED HIM ILDUH ChEEHa AtfB H3ZZAW3! H 
TOU HAVE UOM TUIS JOUST. 

mis J3 TOUR BECDilB JBUST- TOLlR OPPONENT IS THE SILVER KNTQhT. 

I8UR AENlffO PBEHTU-ff^^ 5 

TOU tIAT USE ONE QP Tlf^Sf DEFENSES: 

4-STEA&T SEJIT, 3-SMI£LII HiBtfp i-3HIELI LflU. 

tlHAT IB T3UR CuOICE^ A 

hfE BROKE HIS LllNCf- 

TOU BROKE -^OUR LWfCEC CRACK-,.) 



rOU AGE HOD FEAitT TQ IRT AG AIR. 

TOUR AiniN3 F0IRI(1-B3-? ? 

TBU HAT USE 8«E Of THESE lEFERSE^! 

3'LEfT lEAJIp 4-STEflOT SEfll, S-SKlELfl HiD3, ft-SHJELB 1_DU. 
URAT IS TOUR CH3JCE? 3 
HE £Jta»!E HIS UtlCE^ 
TBU UJ3SE0 illJj 4 HISS 
TOO ARE HBU REACT TO 
T3UR AIh34tli 
TOU HAT USE 



5 

ERT AflrtlN. 
PUINTM-Bf'? 3 
ONE OF THESE DEFENSES^ 



1-LOUEl! RELrtp Z-RIOHT L^Affp 3HEFT LEANh ^-STEAi^T WftT, 

3-BHIELB HESH, i-ihitLH LBB, 
UHAT IS TOUR CHBICE^ 4 
HE KNUCKEB flFF TQuR fltUfr 
TOU BGOrt TDUA J-AHCEC^RACR^wF 
THJ ARE HQU REAOI TO IRT AGAIH. 
TnUR AIHINE POIMTM-t^T 3 
TSU JfAT t^?E OVE OF I HEBE EFENSESi 

l-LOUEFT i^E2.H^ 2-RIGHT LEAN^ 3-1_£fT LEARp f-STEABT SEflTp 

5-SHlELLi HIGH^ i-3ilIEL| LOU. 
UHAI IS TOUR CKOICE^ A 
HE HIT TDUR SHIELD BUT IT OLANCfO DfF. 
TBU BROITE TUOR LANCE BUT UHSEATES TOUA OPPOHErtT- 
TflU RAVE UBU THIS JBUST. 

TBU AfiE B0IN6 UELL' TOUR THIRD JIJIIST IS AQfl]H9T T4E RED >LlriJ0H1. 

TOUR AIHIN^ P0]ffTfP-B)7 

TOO HAT USE OME Df THESE DEFEH5EG: 

1'LOUER HELlIt 4-STEAIi^ SEAT. 1-BHIELD UIEH, J-SHiaO LOU 
U«AT IS TOUR CHCie£fl 1 
NE HAS UNaEATEO YDUCTHUBi} 
TCU BRDKE TDUR LftHCEflCRACH,,, J 

TOD BflD^ S-OU LDBI. ilOPE TDUR IHSURAHCE UAS PflID UP. 
SORST* BETTER tUCi; ifEIT JDU5T. 

m 



Td 



Jumping Balls 



Jumping balls Is a solilaire board 
game ptayed wilh a board having nine 

holes in a line Ihat can be filled wilh 
four white balls lo the righl end and 
tour black balls lo the left end. Without 
a board, it can be played wilh coins or 
chips. The ob|ect of the game i& to 
reverse the position oT the balls (or 
other objects) trom one end ol the 
board lo the other 

YoL] may make a move by moving a 
ball 10 the immediately adjacent empty 
hole or by jumping one other ball. You 
may not |ump two or more balls. Holes 
are numbered trom left lo right. At the 
beginning o1 the game, hole number 
■five is tree. Consequently, a legitimate 
first moue would be six to live, four to 



Ftun 



JUMP JUG lALiS 

tHEftTiyt CCHfTHlHft 

hOSPISTOttll, irFU JERSEl 



llfSlffUCTlinfS' YES 

l« THIB BflrtE mu SHE eiWEM E BftLLS M A ' HOLE 
fiOliHli, THE OBJECT I& TQ FlE^iEPSE THE BPttEP OF THE &4LL5 
mt 'S' UPS 5IL1IES: BflUS #N|I THE 'G" ftPE QBLD. 
tHa hU^T Sit 1HC SILVER TO lIHEttE Ut SOLD APE AI'Il 
TITE eaii ID DM&^E m SILVER HRE, THE SPACE IS 

a nntb oif ihe brarh. 

ODDD LUCfcf' HfRE IS THE 

, 6 & t nOUf flt^ 

& . e jj t fwvE' <,fl 

G S a 6 E rtOl'E^ S,4 

. 5 B G G t'D'Jf ',3 

e S - 6 Ij HQVEi 6,7 

6,500 hOVE'' 5,i 

. e S C G IDWE' fi,5 

6 Ij flOvE' 5,4 

G & G G MOVE'' 3,* 

G G E G HOiJE' fl^i 

G - S S ^ G hOUf b,4 

« Ij S - G B G KIFUE' S.t, 

D 6 5 6 g . & hOVf' 7,8 

E & . S G WJt^ 5,d 



S D 

B E 
SPitCt 
HOWE' 
G S G 



3 b 

B 
G 



S 

& 

s 

G 

(^ 
G 

Q 
G 

G 

G 
G 



G 

6 le QCCLPIEB 

G . G S S G 

. G G S S Ij 

« G S 5 G 

G G G G G 

G G 5 G & 

Q S S Q 

& G ^ S Q 

. G G S G flDVE? d^? 
5 



HOVE? 4^3 

MOVE"? 2p^ 

nOVET 3+2 

nB"JE^ 2p1 

JffliJE? 3p2 



S 

E 

S 
S 
5 
S 

s 

5 
. S 5 

S 3 S 



nGvEf 4,d 
riCrVE-7 J ^2 
5 novE-7 7,5 



THU CDlPLEtEQ THE GAME IH 
Ot 



live, three to five, which would be a 
jump, or seven lo live, anolher |ijmp. 

The computer does nol rank youy 
playing ability but. asahmt^you oughl 
10 be able to complete the garae In 
fewer moves than are shown in our 
sample run. 

The original author of Ihls game was 
Anthony Rise lo- 



34 hCVE9 1 1 1 



LIST 

10 PFtlHl 

20 PfilBT 

JD Pfi[NT 

4fr FftlNl 

I05fl 

TWH 
1091} 
10^5 
llfFO 
ItIO 
It^O 
1123 
11311 
1Ul> 
USD 
1UD 
1175 
11S0 
11»IJ 

1!10 
1220 
1M6 

125C 
IJdfr 

12S0 
13?0 

UUP 
1310 
1320 
f330 
t34D 
1351} 
1360 
1370 
IJSO 
13*0 
HOC 

mo 

1430 
1440 
14Si> 
1U1> 
1475 
t480 
>*?0 
15<fO 
1510 
1512 
15H 
1120 
1S30 
153^ 
1545 

isao 

t54D 
1370 
Gt 



1li»C223;'JU#»Q BALLS" 

TfiiC2D?r'CR£fi"fiV£ COHPUTIHG* 
TAKClB3;^HOR[:I5TaUH^ KEk JERS^T" 

iWIHTlPRINT 
DLft a(?^t3 

PS IN] "iHSTfiUCIlOhS"; 
IITPVT 111 
[f (.EFTlCftiplJi-fl- YUEN 1150 



"BOAR I 

■THE ■'S' ASE SILVER BALLS AHB TlTE 

■TflU BUST" BET fttE SlLVEft T5 UMERE 

-THE GflLB TG UHEKE THE SILVER AJfE« 

*1I PtfilGD [>H THE BOARJJ*" 

"^GOaa LUG»:li NEfiE IS THE SOARVf" 



m*r ^^ IW THIS OABE TOU ARE GIVEH I 

PRlflS "BOARD* THE OBJECT IS TO frEVERSE 

fRIHT 
PRIWT 
PRINT 
PfilHT 

ptrnT 

S=0 

FOE t'^ TO 4 

LET 0CK^n»3 

REIT X 

LET «CJ^1?-4} 

FDIt X^ TO t 

LET fl(Kjt?=: 

NEKT If 

LET f»'^,SG- 

FOR X-=1 TO f 
PKIHT lllS*<fl*tD(J:p1J+l,l]; 

Fftiirr ■ "; 

HEXt X 
S=S*1 
PRIflT -HOVE^ 

IF J*<=^? AHD N>»T AND nK=? AMI H1>:^t THEJ* 1320 
PtIWT "ILLESflL fllTVE" 
0O10 1270 

RCH: CHttK FOR 

IF fltl^^Bl Of H-I^flt 
RER± 9irBH0Ut|lf 

IF H"T 3HER 1J?5 

IF HeI JHEif 14f9 

JF 94tl^U1>vO DR atH-l^lJ^O THE«r 1300 

flQTQ TUB 

IF a^M-lpD^O THEN 1304 

eoro 14J5 

Tf atH*1f1l-a TH£H t300 

IF H4 20H1 AMB PI-20H1 V«E(* i3l* 

If SfH^TKX TH£K 14^0 

F1ll*ff -llQTHlJtS AT SPACE^';H 

BOTH 1270 

IF D(Hlp1 J=0 THEN 14?0 

PRINT »*SfflCE^Hl;"lS BCtiJPIEO" 

ttDT5 127fl 

LET a{H1tl>»0<«f1^ 

LET (l[Hpn^& 
X??BMTll+Q*5p1i*St3,tlHaMp1} 

T9l;Du^a^*o<7^ntocaTl>+■Df^F^^ 
IF K* = e ftHr X?M THEN 1330 

GOTD 123a 

PftlilT "TOU UItt""" 
PSIHT ^"TOU COftPl-ETED THE GAJff I« "J5j" R0yE5■"^f■ 

fRlJfT 'AbA]M»; 
l^PUT Al 
IF LEFT»tit,1^="r' THEH 1130 

ENO 



£ALL& OH A ^ Hi^E" 
THE [JRKfl 5F THt PftLLS'* 
^e-' ARE GOLIT-* 
THE GOLD ARE AHO" 
THE SPACE IS" 



LE{]AL m^E 
TdEM 1430 

FQE i:}iE[:i:itifl juhps 



77 



Keno 




m\ 









Keno IS strictly an American inven- 
tion ihat originated In the casinos In 
Neh^da, perhaps In Reno. During the 
game, twenty numbers from one to 
eight/ are selected al random. Prior to 
each game at the casino, the piayer 
may choose from one to fitieen 
numbers, or "spots" he thinks will be 
selected during the game. The player 
enters, or "marks." the desired spots 
and places a bet. At the end of each 
game, the spots marked by the player 
ere compared with thetwenty numbers 
and thepayotf Is computed according- 
ly. Keno seems to have a high attrac- 
tion jn Las Vegas because the betting is 

very simpleandlhemajiimum payoff is 
very high ($25,000). Neverthefess, flie 
probabifity of winning is extremely low; 
indeed, Keno returns more to the 
house than virtually any other game 

In this particular computarslzed 
version of Keno, there is only one 
player and he has the opllon only of 
betting eight different spots. In Nevada 
the normal bet is in multiples ot 60<|;; 
however, in this game the bet will be 
11.20 with no inuitiples possible. The 
payoff with eight spots marked Is as 
foriows: 



Spots 
5 
6 

7 

a 

There Is no 



Payoff 

Si 0.00 

Si 00.00 

£2,200.00 

S25,O0O.Q0 



payoff for zero, one. two, 
three, or four correct. 

This version of Keno was orfginally 
written by Vlncerr Fazio. 



KEND 
CftESTIliE CnnPUTlrtG.nORRJSlDUM, N£U JEBSET 



JiUfD IS fLJTEB in MAT ^f,%m% IH Lfl3 
Plfll CEiO Br CB*IPIJT£S. OHF l/tSlfiTIQIf 
THF RMCOK HUll&Ef! 9E If ED 4 lOEr . 



W6flS. 

Df TIfE 



BtiHE, UriLIJE? 



IlfE PLtm CtfDGSES e SLFFEtEUT WUIHItG FfiOn f TO 80 
IKLUaiVEj AirD BEIS H .?D. \Vl CQMPIJIEFC UJLL SELECT 

30 NirniEits w\ RAHDan fivc ii(il fiiiriMrE iiupL]t*iii-'5 hh!cii 
lis DiiCUi . JirOTIIEli hUKBER U3LL BE INSEfTEll lrt ITS PLiiCE 
&9 TNflT TJtE tOdPlTEl; Uia OUT PUT ?fl nrFfffftflT NlTIIBtftE. 



HEITF UC 09*1' 

THE CCltflTEl! BILL IHJIPUT A ' HflltK. TfPE A dUnBfff FHOtI 
1 ID eo. 1*C1.U?||JE, flJiB e^\%% THE GEIUttN XET. BEPEST IH19 

PBOttJs jmii iHE ' pitiKi z£ rjo umetif ^hciun. 

T 24 
'' 35 
? « 
? 77 

1 1 



TrfE COPPUTER yiLl SELECT 20 MJPBEffS AT FAIIDCh. THE BEU 
THE IMICATEB IT IS ]*. 3rtE PPnC£35 OF SELCtTIrfB THE JUJnBEBl. 



rOIFir HUffBERf AREe 
1 ^ 24 JS 4d l'^ A5 ; 



THE CflBPlFTtlf HUB 3ELHTETI THE F^ KLOJl HQ NUHBEPSr 

JJ 1 7\ tf 44 7 IS AS fiif 3fl 45 50 ^a 25 H 77 d 

\^ 51 

TBE PfDetAPI [im, COB PAKE TQfJH *||JflB£Ufi UJTH THC 
MUFJflEliS IlfE CDflPLTEf HA^ ^tLtCTEB^ 

LIBTElf fO^ TIfE HELL TOUE— EACPI JtlHQ 1«ICATE5 ABOIHEIf 

CDtrcECl &U£5S ftV lOU. 

■mu hilVE EUESitli TME FflLlOllEff ¥llllBEff5: 



4f 



7? 



'TOJ CALTSHT | HUClKRS DUI OF B-- 

NDT ElfDirtll COBPECT etJlSSCS- -SQ SQtLI', Hb 



PflTOft, 



7a 






T}IE COtl 

1 TO ao 

PROCESS 



PlilEfl WILL OUrPUl a ^ MfiTlh^, TTI>E A HUfl^ER FROfi 
iHinUSR'E, ftiJ& PRESS THE RETU^^H K^t^ REPEj^T TKIS 
UNTIL THi -^ tWiRK ]S JfQ LJIHOER SHDHM. 



23 

7 

75 

1 

55 



IHE rOftfUTER HILL SEtECT It HrtilERa *T EAHJHI. THE BSLL 
rCNE IHDfCftTU IT IS EH THE fRQCESS BF SELFiCTlNt THE NUHBEHS. 



a t5 7 25 Ji ^5 



1 5b 



1H£ JlDitPUTER KftS ^tLECTED THE FQLHIU1II15 
« 2i 1? 38 ? IB 23 i^ t2 3 6 

41 se 



NimSEHS; 

51 U ?3 



71 H 33 'fl 



THE FPOfiRAK IfILL DDMPrtRE TOUR HUH^tRS WlTJ- THt 
E^SttBtAa IHE CflHPuTEt WS HLELli.1. 



Lt9TE» fOR THE BELL TQIIE— EftCH RIHQ li^flltAitS AHQlHER 

CQRRtCT GUESS BT TOU, 

lOU JIA'JE IJUESStli THE FBLLlJUeil KyPIBERi;] 

7i 



Ji 



TfJU l^AUGHT Z JtOnBEftS OUT iff 0— 

Ci0F EilDU&H CORRtCT eiJEdStS" "^SQ SOLLY', iH3 FflTQFF. 



ElD TDU UAHT TQ FLAY KENJ^ AIIAIU-? 
TIPE 'TES^ QH ^IID^ 

THAT'S ALL FOR HCU. PJ-AT t^tHl) AGAIN, BE iliElrtlj fDU. 
OK 



LIST 

1 FRIHT rft&IJ'lJ'KEHfl" 

2 FSfNT TABCl^J" CflEflTTVE COflPUTIHGpHORdSTQUNp 

1 eiH tt^21]rfl[2J^A^B3 
? PRl*fT5PRINT:PR]ttT 



JIEU JECSET^ 



6^ 

AS 
it 

/I 

73 

?5 
7£ 



IN fOUfl INPUT." 



14 
1} 

U 
1* 

2l> 
2J 
2& 
29 
■J? 
J5 
^fl 
41] 
4^ 
44 
40 
5(1 
51 
51 
tJ4 
55 
5A 
5? 

5^ 

AQ 
41 



PBINT 

FfrrNT 

PftlHT 
PRLUr 
FREtT 



'KEHJ IS PLftrttt IH HAH^ 
"PLAT KEHQ BT eBMfUTER 
■TH£ RANftOH UltHiEi: 



Cfl5I«US IN LAS VEIjflS.' 
OJIE VftfilftllOn Of Tt* 
StNiRArOH." 



THE ^LAiFfl 

fRlflr'iHCLi^aiytp 

PEEWI'^O KDI^BERS 

PPINT'ilAT UCCUR * i^NDTREK 
PRINT-SO THAT THE CO*iPUTER 
PBINTiPRINT 

PfllNT:FRINT:PRlJtT -•JtR£ ^E GflM 
PHrttF-THE CO**PUTER ilUL OUTPUT 
fRlHT"! ^il BOp IHCLUSIVtp Ae4[» f 

FSlNT-FftQDESS UHTU TWE ? ClftRX 

FCft 1=1 Tl ft 

IHPUT Aa? 

IF flCIJ>BCi THEft 54 

IF JlUJ^O THEM 5i 

IF AaKO THEH H 

QHTQ V 

PftEHT-TYPE fl NLiHBER FfrQN 1 TO ) 

ttEKT I 

C=U]FDS K=l TO? 

FDR J=H TO 7 

IF K>T THEN 73 



CHCDSES B ftlFFERfflT NUHftEPS ftOH 1 
AND BETS it,2<\. T^E C0*1P15T£R UlU 
AT RAIDQH 



UHE, UIILIZES' 



SELECT" 



AHB UILL ELIHTMATE ffUH_lCAIE5 IfHlCH" 
*IU*l&£Fr UILL BE INSESfED IN ITS PLACE" 
HIiL ttUTPUI ZO DIFFERENT KUrtBERS,- 



A ^ IIABK- TTFI: A NUHBER FfiOH - 
REES THE RETUfiK KET, REPEAT THIS" 
I& IjD LfltiGFR SblQUH," 



INCLl?lvE^ PLEASE."; GOTO 5fl 



PLEASE >' 



91 

100 

U3 

IHA 

lU^ 

110 

112 

115 

llB 

12t 

i:* 
Mi 

i;? 

145 

147 
143 
1^] 
1^4 
15? 
1A0 
1i3 

14? 

l?fl 

1^3 

1?4 

t7? 

132 

1S5 

IBB 

1?1 

1?4 

1?7 

2fin 

2D1 

207 
1>10 
213 
2U 
SEP 
222 
J25 
2^0 
231 
^34 
217 

242 
E4J 

245 

346 

24? 

25fl 

251 

251: 

2S3 

254 

3^3 

2^6 

257 

2$0 

25? 

^41 

^A4 

?i7 

270 

273 

2?i 

2?? 

^ft2 

265 



rtlE lELL ' 
THE NIHIBEBS^" 



PRLdT'fi BUfLlCATE MU^BER HAS BE£h DETECTED 

PR1I^T"TTF£ AJIQTHEfl ilUflBEfLp PLEASE. "ilNPUT S 

IF T^O THEH 70 

IF l^QB TH&M 70 

Ef 1"<a THE** ?0 

ACJtl?=l 

GQTQ 61 

PRINT "^TPE a NJflBER FWJh 1 TO M, JHCLUSiytf 

GOTO ^4 
HEEI J 

NEKl K :fR]tfT:PRINT 
]F C=0 tHEK Be 

PflINT'^HE tOHP^TER UiU SELECT 20 riU«»£R3 AT PflNflOft. 
PBINT"T0H£ IfciBlCATES ET 15 IN THE PROCESS OF StLECrXHG 

FEffl L=1 TO Z0 

lirLl^IHTL5lJ*=RRBi8*^-^t5 

JiCL^^HCLJ 
HEXT L 

L = 21 

FUR K=t TO 20 

FDR Jrh TO L-1 

IF K>T THEN 13? 
JlCJtU = INnB&fHHEl*l)#1> 

00 TD r24 
PR[HT [HE^tt7J; 
KEIT J 

HE^T V, 

PRINTiPRIflT 

Pi:[«T "TOUR HLJHBEfiS AftES" 

FOR 1^1 TQ e 
PRTHT AC1>; 

«EJ:r I: PRIilTiPlTTttTrPRIrtT 

FIfINT" THE tOhPUTEP HAS GfLEClti THE FDLLUUEttO HUflBERS:'^ 

FOR L^l TO 20 

pkEjiT Ha); 

itEKT LtfRIHTiPRiNT 

PRINT"TftE PtOGftAH UlLL CDHFARE rOlff HUftBER^ UHH THE • 

PRINT-ttl3*iBEftS Ttli tflftfUTEi: HAS SELECTED-- 

PH T iM T " PR T MT 

PKIJIT"L]r£H FDR THE EELL TBHE— EACH ftlHj INBiCAlES ARDTHEB 

fRllfl "^tDKflECT OUFSS BY YOU.'^i 

PRIHT '■TOU KAWE &1*£5&EB THE FOLLQI^D HOH&fcJ^:" 

0=0 

FOR J*1 TO 20 

):=A{E) 

IF X=T THEN 213 
NEI^r J 

GOTO 273 

pRiriT CHfll(?^; 

fOB Vl=t TD 37?i:HEAT Wl 

PRINT ft<l^ 

OdG^I 

l = ltlireiilT:If lOB IH£W 1?7 



PFt]«T 

PRINT 



IF a<J THErt J42 

IF G=5 THtW 2i1 

IF 0=^4 THEN 2i7 

IF G=7 TttEi^ 273 

IF B=B TH£(t 279 

YDU CflU&Hr";0;"«LI[tBERS DUT UF &--" 

HOT ENDI^GH C0EftECT OUESSEii-- "SS SOLLT^ HO PATOFF.' 

PS[NT:PRIHT 

PRIHT "BO T0U UAHT TIT PLA"C KEHO AOAirf?* 

PFiEHT "TTPE US'' Ot '^W 

C'0 

INPUT t% 

IF H= -^TES" THEH 3fl 
IF i:*="NlJ- THtH Z?? 

IF C=3 IHEH 799 

PRIHT *TIPE ■'TtS' OR ■'NQ""" 

OOTD 251 

IF j:*="ND" THEH 2*? 

PBl+IT "TYPE. TES QH ttD PLEMEII" 

FREHT -YOU CAUGHT";OT-iiiJHBERG UO^ 

PRINTiPRIffTlGOTO 24fi 

PRINT "rfl0 C*ilJGHT^;0;'HUtl&£RS OUT OF 

PH[NT:PRINT:B0TO 74i 

l^lMl "V0U CfiUBHT ■J0;"NOHBERS OUT Of 3---rOU WIH (2200.00" 

fREHTEPR!*lT:BDTD246 

PRIHT *^fDU CAUOHT ^TGr^UHBERS OUT OF B--YOII UTH 125000*00" 

PRIHT "B 0UY OF B0E5 HflT OCCJR TOO 0flEllp LUCKl^*^ 

PRINTcPRlHTsGBTO 246 

PHIHT "THAT'S ALL FOR XOif. PLj^Y KEriB AO^F' 

tHD 



&F B— YOU UIH $10.00' 



a--T0U UIH *fc^l0^OO' 



&E SEEl«e iBU." 



7S 



LGame 



The L-game Is a 2-player strategic 
game played on a 4x4 grid- It was 
originally devised by Edward de Bono 
and appeared in the book, 'The Five- 
Day Course In Thinking/' In the game, 
each player has one V which covers 
four squares [3 high x 2 across). The 
two Us are labelled differently to avoid 
conrusion. There are also tv^o neutral 
'boxes' each Ihe size of a single square 
on the grid. To play The garne wiih ihe 
computer the grid positions must be 
numbered as follows: 



1 

1 


2 


3 


4 


5 


6 


7 


6 


9 


10 


n 


12 


13 


14 


15 


16 



RIM 



CBEATJVt CDttPHTlNE 
mlfilftSTIHIHr H£U JERSEf 



Pfay always begins with all thepieces 
on the board In this position: 




T3 






\< ^>1 












l?*WS> 






■Vf'+S'-V- 



8 



12 



Either pjayer may move first. To 
move, one must pick up his L and move 
It to a different position on the board. 
The player may flip his L over, rotate it 
90 degrees, etc. The L must not cover 
any other pieces or hang off the edge of 
the board. If a pJayer is unabte to move 
hie L or simply cannot find a move, he 
loses the game. Once the player has 
succeaslully moved h^s L to a new 
position on the board, he then has the 
option of moving the neutral boxes. He 
may move the bo^^es only to unoc- 
cupied positionsand he has the option 
of moving one box. both boxes, or 
leaving the boxes where Ihey are. By 
using the boxes effectively, one can 
block off moves for the other player's L 
and possibly pin him. After the player 
moves the boxes (or decides not to 
move one or both) it js the other 
player's turn and play continues in the 
same manner 

The computer version of the L Game 
was writien by Bill Gardner 



II&TtUCTIflirJT TE5 

^ricj bv tiP? opposing playtr^p in ttilt fa^p bEtut?n you 
BrtEl thf co^tut^r. Thp and iz nurtb^reiJ a^ fallnutt 

1 3^! ?:: 3e; 4t 



: S:: 4:: 7i; 8[ 

Ml rH£KS I =± ± = xmr^ 



:l3;sH;;[Sstt£l 



The object of the game is simply to 
position one's L and the neulrai boxes 
topintheotherplayer'sL-Eachmoveis 
a mixture of offense and defense, for 
one is not only trying to pin the other 
player's Lnbulalso trying to prevent his 
own L from being pinned. 



Ih* nbj«t of l*w ?aH U tfl pailtinn your ChLfi 
L intf til* bQKtl to pr#vtqi tfrt C5*ipul»r fr^H nO^iirj 
Il5 I* Of £fiu^^«p It tt l^^l■s to de tht lanB to i^ouf 
Ti ^ovt^ sPDu AUft tinply fnttr iht tgur roordmates 
bftirrt yiu Htnt I* pliE* your L- II hirtt rcfltto on tht 
frBjrfl n€ Airil lot CBV*I- iry olhtr plvcpi. rou nuit 
wyv* irour L' [f yau cainot frnfl i nt« pe^itlCI 
f*r ynur L^ then tit rOAputfr ha^ effectl^tlv pinM4 VOhr 

Altunmg yfl4j h^v^ ^jcct^irirlly aovf^ your J. p uou Tioy 
hIVt iht Dpiich or BDvma tli* boxe*^ Twi nay nove nnEp 
tHD^ or fiffnc or the bo^ts bv finely pntprm^ ttiE cocriJustES 
uMr# vftu iiiTNt to ptft LheiiH le l»^>t t ba^ ulivrt it is 
eitfr ti% |hre»al potUlOn. 

Aftpr you novt tht tOlftt, it is HP to thf coi^puter 
to rxna a flflv* for tU L irvd pUy iBntlnuii m the IJnE 
hlMtr. It»t4rt>er llh^t VDU ALtt ao; onJy ir^ to jjin tfift 
capipjitr'i L fa4it alio ^erp your 0UT1 L froii beln^ piTiii*d. 
*lia. It i& taEJ»r U pEav tfti |ut wUh your oim board 
tfAr tbt COApalvr prlatdUt. To r«lgrp n%4t OpO^O^S 
in plkCC Df yr^mt novo, GDDC nfiri:* 

VOASD ^BIHTOCJT* TES 

TW rfll UISW TO STAilT? Nfl 



Tht qafte 1^ pltyod uiih four pioctt; bath 
V^BU and tht rfltfputrr hav« one 'l^, and tthirp aro 
tuD ^IDlES' MlilCh trp u^fd bv both playrr^^ 
ptay )l4ftyi te^iirt vitit tht piact^ Bn tl>t btiard 
ID ttit fnllDupng potltlOTii 

""////OIIOO^==* 
: !S://y/OO0O: (j 

= = ^=^///QflOO"" 

;i3;DttaD0Q0O* + 
■ ■■ttlJOODOIIDO*^ t4 

(C^ti^uior i^ /^ you arE Qh 



CDNPiPTER H07£S TO ? 
M3VEE Bai£5 

; 11/^^/: J:; «[ 

■■■■////oono««»" 

I 5:^///0OClll3 BJ 

/>y/////IJDOD**a+ 

//////^/OODO**** 
^"■QllODCODDkiT* 
nirDDODOODO* * 

= ^ "000^0000+** » 



TO 



10 9 
T2 Alfb 



1J 



SO 



TOUR flOVE fW Lf ^3.7p1l 
TOUlf KDVE FQfi THE MrfS' UU 
O.K, 

♦•••///'/iTDaODOOO 

* *//^/CiTacfDaoo 

: 5:/^//00Oil- Qj 
/y/^//.VOnOO:]?: 

///^rV/znoiiD"" 

:]]|4 4:IS:±t&t 



VQUI: MDVt fQPl THE HOI[;S^ 2,^^ 



////: iiUDQIii ax 



HDW3 BflVES 
: 1:: ?:DaOQ: (l 

////t: *&QQL-acua 
////**** 001) Qooai] 



LAT£ 



*^/ 



{Z 



lUB 



6A^^' 



TO 



TCI AN[? 



COMPUTER ttO'^ES TO 1 

; 5i» •////; ai 

QftDaQflllDODClLlxlii 
OeOODD 0000110^=^= 



2 

ra 4 



3 ? 



10 



IDUR MOVE 
^iJUft *IDVE 



FOR L? 4,3,11,15 
rOfi THE BOXES* ir^* 



///^////^///OflCD 



rElUR flU"/E FQR l"* 5,?pl0pU 
lOyR naWE FOff TH£ HU]l£l3? ^p? 

a Dooa ■»!"** *■=*//// 
OODi^aDQODfllll)//// 
OQODODQOODOO//// 

□DDOflQDQODfllJV// 



±1J;;14±:15t j16t 



tflflPUTER ttOyLS TD B 
BQL^ES BOXES 



; 1:± 3l] 3:: 4± 

■ rc= = = -=. = -±am ■■ FTiC 

ODBQ* **= =t///^ 
DttOaDflOODOflO^/// 
OOafttlftUi^QiltU//// 



13 
Tf] A 



Id 

Arts 



7 



fUOR flQi/E FOR L'^ 7,TlHnp1t 
TOUB HflUE FOR THE BDKESr 1Q^^ 
O.K. 



COHFUTER 



t 111 7i* *i 4: 
////////QOflOs 8 I 

/^//t*+to[iDa>""i 

///^* tOflOCi^^: 

//^/*h**Dn[)aoflOD 



CflftPUTEE rtOVH T& f 1 ? 3 
iflVE^ BO^iEB TD 4 FiHD 

////**^:toaaD==i" 

//ff* tOflGQ: B: 

//yy* *ODD[J:i!i 
^//y»*^*iiCiOQ==== 

■■■■■■P-pQj3Q0QCf] 
= = ===3:^.=GOQOD[HJ0 



■ffltJK HDVd Fan LT 1UtlpHr13 
VDUR HQUE FOR THE BOXEE"? 4,10 

/////y//-==-"= 
j//f////z J:: (s 

/y//**-*t:=-=-==i:: 

/y//* *: ?:3 0: 
^y/y*t** ======"■ 

///^*t»*[)fl[ja ==::?= 

yy^/****a[rDfl=^^= 
DDODI}011DOIJ0D====: 
QHD^ngEUDQCDit^l 
QQaODODQOQDQ"" 



11} 



MDUES 

iioyES 



Tfl 1 
BO:(ES 



FD 



? 10 
6 AID 7 



/y^/i It: 3:01101} 
/Vy = = — == = =01)00 

///.■'*tT4f*4:*U0D0 

/y^/-4**t*H+0BDO 
/yy/y/y/oooDOflCiO 
^/////^y^30^^ClOQ0Q 
///////yoflufloono 

Mflfl ■■■* == = = — = - 3 J 

:1I::lfl;ttS::U: 



VJIUR nO'yt FOR L-7 11^13^12^14 

ILLEOrtL ftO'^E FOfl L. 



rOllR HOVE FCfP LT 11,U,H,T5 
iWR flOiJE FOR THE BOTES' 2p7 

//^/* *S 3S[ 4l 

/^ //====***+"" 
////: 4:* *= Bi 

///y====**t*""== 

///y/y//QflDO="= 
//////;/aBao:i2; 

/^,'///^/O0flO==an 
OBDflDflOO[lOOO== = = 
QOODODOaQCDOtlA] 
qDODfll}flOUJ^U0=^=^ 



HUVES BOKEIi 
I 111 ll/f/f/fl/ 

; 5:* M *//// 

= ==11^=^00(10//// 

: ¥::1i)tDQllCiy/// 
,Ec====^E]ODa///^ 
000000000000-==^ 
QUOOQOOOOOQDtlAt 
aD0l}QO00[10OO-^=^= 



TO A 



1? 



TOW flOUf FOR L7 ll,S0,?pl3 

rawR tiOUE FOR EHE BOXES? 3^7 

^======T«tt:t==-= 

: 1:: 2^- *r 4: 



z3dK9iv=**^4y/// 

: 5:: 4:* *//// 
==-====1^ **+//// 

GOODDO&OCOOD-V// 
iJODftOJDODOSOy/// 
000 00 DQO 00 DO//// 
0000 "•==// ////// 
a[}DO:H [//////// 
lJDDO^i==y /////// 



CWfflftEft novEB 
HOLIES 



TIT H 

bdi:e[] to 



15 



ifi 1? 



= ==a-i?====*i»=T 

; I:: 2it 3:: ^i 

flmSHVHK||= = = KSXEE 

t !^;* *.* <t B: 

onooBoooeroOf)-'/// 

OODOOOnDBQOO//// 
OflOOOBOOOOOO//// 

nooD///////////' 

fl WD// ////////'> 
DlOO/ /////////// 



TOlff flflVE FOR Ll 5t^tI0.1I 
lOUir RffVE FQfi THE &DXE3? 3^^ 

: 1:: 2:^ *: 4: 

= =ftlEl?=*4-^fd^i* 

COOQ: 4:: ?l* * 

J]^[] Q c==== =*^ i-t ** 

ODO 0000 0000/ //^ 
ODQ[?0005DDODy/// 
OQODHOOOODOO//// 
==i;±y////y/y/yy/ 

]t3i//y/r'/////// 

ET-==/y//////y^// 

C0*(6flAT^JLft1IQe^Sl TOU HflOE UON, 



PLdT ABflTN-^ HQ 



SI 



10 FfiTNT TftBCiirL-QAHE* 

11 PRIME UftC^HarCREftTL'^E CQHPITIHQ" 

n PRItfT TfiEaBl;"HI]RRIBTOtfH» NEU JER^fT" 
13 PfiIffT:FRlf*T:PRINT 

35 PRIHT -IKSTRUDTTCKJS-; 

3il INPUT A1 

35 IF L£FTICfl*.t}=-f* TWEH 3000 

40 PfllHT -BOACl FRIfllftUT"; 

45 [flPUT fti 

5D IF LEfHC*t,15^-rt" THEN A9 

55 LET r2=0 

^0 QHTQ 7l> 

6i LET F2=( 

7» GoauB ii>a 

S« GflTD 31 1^ 

IDO R£H IBlTIllLIZE IiflTfl 

101 REH fflTB2 = POSITIONS OF BDXEa 

1*2 fiEH Cn.IrJr^^ = CO'lPtllER^S POEITIOH tU 

t03 REtl ail,Zp3-43 = BPfO^EIH^S PaaiTIOH (U 

ID^ REft TMp3.3,4J - fi,7,lOtl1 = CEHTEK PflSITIQNS 

1^5 REN Bnp,*,1i> = BOftfil": 

1*4 REH 9C1?"0 EHPn 

i«? tEH Ecn-i uppaHEttr-'? L 

1D& RE*I Ba]=2 CQHPUTER'a L 

]U* REH BttJ=3 B0;< 

115 RE5IDSE 

l?fl IfATft M4^?p7p4piJlH?r10p15,iap3Tl^pl1 

13l> BATft ip2p2T*'hC>2TlrJr'>p2rlTMTlTl*l 

1^0 REl^H BIp^Z 

11* FOR 1=1 TQ A 

UO HEA[F cc:9:^otK^T4X? 

17^ REIT if 

1^0 FOfc i='^ TO 16 

1?0 REAH BCll 

2** UtXT ^ 

2fl5 TfETl^RN 

210 PRINT "Dfl TOU UiSH TO STflPT^j 

Ha IHPtIT M 

220 ]f LEfTtiftlp1^ = "r THCH 5CHI 

?30 AEtl DPPOHEHT-'? flO^E 

;Z40 PEINT 

245 FBlNT "YQUt H&VC FUfi l"J 

250 ]l#POT BM?,IH:?tni3fpIl[^? 

?55 IF fl»aCIIMH-HiBEfU(?]^*ABS(D(3}»#flBS<!mJ5*0 THEJJ 12flO 

260 REil BUBBLE SOF^T 

^d5 FAR K=l Ift * 

270 FDIt r=l TB ^ 

?75 IF n[Tf?nCV-1^ THEN i^S 

2BCI LET Uti'O 

2B5 LET |ILli=B[T-1) 

2W l£T DfT'1>-I 

:n NEKT T 

3*0 REIT 1 

3*5 tEM CHECK le^JriLIT7 

31U fOfi i^l TO ^ 

315 LET *f[):J = BCXl 

3?0 NtKT K 

375 LET U1=^ 

33U LET F1=0 

335 QQBUB lEflO 

3f0 IF MKM TMfN 1220 

3« FOR 1=1 ra * 

35fl IF BCft[):?>>1 IHEN 1?2fl 

Jl! BEIT X 

3il| FDE K^l TB ^ 

3i5 LET BtaLn3=0 

370 NEKT X 

375 FOR X"1 TO 4 

3Bil LET BiHa]? = 1 

385 LET OCJh-KCKJ 

3?1> HEXr if 

3M L£T fttBll^O 

^00 Ltt B^B2I=0 

405 fRl«T -TOOET HOyE FOR THE BOtES"; 

4HI INPUT X,f 

415 IF AB$tXl+ftfiSCTK>K+-T THEfcl 1250 

Ath If X^l IKEN 1250 

^20 IF Bci:^*&n?>a THeiJ 12^0 

^30 LET El=i; 

41U LET BS^T 
450 LET RCB1>=3 
4*0 LET 5CB2)=3 
^70 PRIHT "Q.ht." 
^75 OUSirS 2270 



-;c(3)!- ■;[;«] 



4H0 REfl CQHPUTER^S nOUE 

^?* REH ffEilDVE Cit-q) FROM 

500 FOR X'1 TD 4 

51IJ LET B1C1I>^ = "^ 

3^0 NEXT :< 

530 QDSUE 14?0 

540 LET Fl"l 

330 LET flT=I 

54* IjOSUB ISH 

570 IF Hl=5 THEN IJOO 

5fl1> REft fIN& ftB-^ UITH BEST CENTER CQIJERAOE 

5B5 QD^tJB 33?0 

5¥0 FOR E*U TO M1H STEP 4 

^DO rOfr F=1 TD 4 

ilO FOB 5"1 TO 4 

i20 IT hCE+FK>Ttfi] "KEIf 440 

431> LET NlE744l]=HlE74*n+l 

A40 NEXT G 

650 N£XT F 

£4C ^EIT £ 

fi?0 003UB 1500 

iSO REN PUT ftnvE TN cn-4) 

i*0 LET T=[r-1)*4 

JOO fBR j: = l TO 4 

710 LET CCKJ^NCX*^) 

720 LtT BCCCXfJ=! 

730 NEIT 1 

740 PRIJn 

750 PRINT "CQHPUTER HOVES TO ";CM?!" -JE^ZN 

740 ff£H FIRD nQi/ES FOR BftSES 

715 REN RE HOVE BDIES fROH BOARD 

7?a LET B(B1? = I> 

?ffO LET B[B?3=0 

7T0 REH IS O^PQHEHT T*l CQRifEFtT 

soil FOR 1=1 TO 4 

BIO FOR J"=l T[f 4 

B20 IF Dfi>=TCJh THEfl ft70 

S30 HCIT J 

S^O IfEKt I 

ai5 REH OPPOHENT IH CDRHERp l&MORE EOITEH 

SAO REH^fPaREHl HOT IH COFlNER, FELL CENTER WTH BDIE5 

8?0 FOR t=1 TO 4 

flftO IF B(TtK?>>fl lltE** ?20 
a?0 LET frl-T(K3 
^00 LET BtB1>=3 

?H1 BOTO 950 

^jo he?:t it 

930 REN HD SPACES !tt CERTEB 
^40 GOTO 11120 
?50 FOR :<=1 TQ 4 

fAO IF BCrcX]>>0 THEH lUOO 
9?0 LET B?=T(K? 
^ftO LET &CB2)=3 
?fO GQTB lOBC 

IDflO HEUT X 

mOS REN CEflTER FILLED 

1010 ^QTO 1050 

1*15 REH BIJTtt BQ?:E5 Tfl K PmiTIMED 

1D20 GB5UB 1*10 

1030 LET B1=B3 

1040 LET B1E1)*3 

1045 REH DtJE BOX TD BE PUSITlQUEl^ 

10SO GOSUI }6M 

lOfrO L£T B2=B5 

1070 LEI EiB2J^ 

lOaO PRINT TilBl9>;"HDl^S PBXES TO ^jBI;" ARE ^Ifl? 

10BE FOR X = 1 TO q 

10R2 LET fttOa?)=1 

10?3 NEXT X 

10Q5 BDGUB 2270 

1090 REtt [HECK FOR Ulfl 

1100 FOR X=l TO * 

1110 LET BiOtX]?=0 

1E20 HEKT X 

1130 OaSUB 1420 

llflO LET F1=2 

1150 LtT H1=Z 

1E60 BOBOfi 13i>0 

1170 IF MI^O IhEff 1280 

1180 FOff :^ = 1 TO H 

11?0 LET BCOIX^^^I 

1200 NEXT Ji 

1210 GOTEi 240 

1?:0 PRINT "ILLEfiflL HOVE FOR L," 

1230 PR[NT 
12^0 GOTO 240 



B2 



1250 PIKHT -ILLEGAL HUVE FQft m." 

1240 PHIHT 

1270 SDTO 455 

J2efl FflltfT 'CDHFUTEff CJfN^^* 

1>?13 C&TJ) 1310 

1301} FI^JNt "COHQFTMULATIDJISi YDU HAVE UHti." 

1310 PRINT 

1320 PfiiNT "PLfll" flGftlrt*'; 

TJ25 IHPUT fl* 

nifl If LEfHtAtpn^'T" THE« 76 

i34{i aimr ^oo& 

^3^} STEM *** SUB^UTlTIIffiS *** 

1340 Ki\ fBi^iiE Nil] 

UrO FQfi J^^l TO 14 

t]flO LET *f[KJaO 

1 1^0 NEXT K 

140^3 RETURN 

1*tl] KEM STORE LOCMIOlfi OF LWaCCUPlEL POSiTIMS Iff rtC!^? 

H2D LET I"0 

143i> FUG ):^E TQ Id 

mo IF HKJ^-O TUtN 1*70 

1«0 LET ?=Z+1 

HiO LET JTCIJiX 

14?i) NCIT i: 

HBd EtTlffirf 

14^n fiEH TH15 SliBTBUTSHt FftTUlTtt? THE LCCiTlOH OF TtfE LARGEST 

14?5 REtl VALUE Jit E^ai- IF A TIE EXISTS A RcUfHOrt CtiDlCE 1^ MADt. 

15fl0 LET T^O 

tSIO LET ?=1 

1570 FOR K^l Tl) Hl/4 

3530 If ilCK^^T THEK 119* 

1i*fl If Kt>:J?T THEH 15*0 

155U IF RllCn?-^.^ THEM 15B0 

]^itf LET y=n(j:j 

15JQ LET J=JI 

t5fl0 HESr I 

15?0 REtLHtM 

ISOl fi£H THIS BUBRBUTIHE Fl^ipg IHE *1QVE FQR A BOX TrtflT *JlLi 

U02 (EH HDST RESTRICT THE (IPFDNENT-'i L Irt TERNS OF BOytS PQSflBLE^ 

uio fOR j:^i to ^ 

1121) LEI B[DUI?^0 

liJO ttEi^r !( 

UAO 5QSLIB 14M 

U50 LET n = 5 

1440 LET ft^ = Z 

1 A70 IjD5U& leUD 

FiltO OflSlfB 1370 

16?0 FAR S=l TD HI 

1?00 LtT [*(fHin-tfC*ICXIS+l 

T7T0 *ie>:t X 

1730 LET «[aCKU = IJ 

17*0 tfE^^T K 

1?^0 LET flS'^i^ 

t?frO iSDSfeJB 15C!0 

1770 LET B3=Z 

n?1> CEH L-FIflU 

1791 SEii THIS SUBRQUnNE Cfl-C^JLATES ALL POSSIBLE flOUES FlJ» AN L GIVECl ALL 

17?? Hi\ EttPTT PDBETIJINS IN *f[):K IF Fl = l p THE EtlHREHr PDSITIDH BT THE 

n^S REfl C[IHFUTEf!'5 L IS OHITTEC. flTHERH[S£, THE CUfrffl^Nr POSITIDH DF" THE 

i:94 BEJl 0PPD!4£WI^S L IS OftlTEtE- iiD^fS ftfiE ftETUIIflEtt IN mi], AND 

17?5 flEfl HI la THE LEHGTH OF HCD- <R1 = MiJIIIEt OF «U£S * 4> 

ISiiO LET ftMO 

1fllO LET J=* 

1B20 LET K=l 

1^30 GBSUB 1BB0 

lB4fl LET jcl 

IflSfl LET K=4 

Iff 71} ftETl^Hif 

19BD J_tT F-0 

TB?0 LET f=-r*1 

l?PO LET Jin?-5fl<i'l 

1^10 LET K^P 

1?20 LET ^(^K+t 

1?11] If X>Ht ^HEH ZO^O 

1?41] If lfCX?-AnK>J IHEH lf2C 

1?S« LET A42h^M[):h 

19fil> LET i:=n-i 

1?7II IF X^ni TMEtt Josn 

1990 IF NiK3-A{2K>J rn&H 19^0 

1f¥0 LET fl[3?=*fU) 

?0CO FQfl E=1 TO HI 

2(110 IF firS4NiEl-At1>^'>K THEM 7060 

li)?0 IF AIS(NiE)-A13)?'=K THEti Z060 

2030 HCXT E 

3l>M BOTIf ]B?0 

205if IF r<m-2 THEN 1990 

2055 ITETURH 

20fil> LET A{4^=HCE? 



20?0 fDK r=l lU ^ 

20B0 !F ACF3/^<>INTCfl[FJ/*? THfN SlJO 

2DfO FOF li«1 TO * 

^110 IF ACG^ = ilCF^4t THtH 2tJf] 

2f2fl «IT 9 

213fl *I£XT f 

mi> fQG t^l TB ^ 

21^» LF Flil THEil 2190 

?140 IF ftif^OOn? THEN TTIQ 

21?0 [fExi r 

2150 GOTO 2030 

21?0 IF fifT^CC^Y) THEN 2210 

2:1170 OUrO 21 7D 

2210 FOR T-l TD 4 

2220 LEF HiJIl+Tl^flfT) 

2;30 *IEXT 1 

22^l> L£t fll=rtE+4 

22^l> GQTQ 7030 

2^iO REH BDARB PRENtQuT ^tP&ROUl£HE 

2270 PRINT 

2275 IF FZ-T TIIEtf Z3M 

^?B0 FBR E=1 TO 13 STEP A 

3290 fttfi F=l TD 3 

2300 fUR O^E TO Et3 

231U ON B(&]+t fiflTQ 2320^241 Dp2430p245^ 

2320 IF F = J "EHlH 2390 

2330 PRINT "=:i""{ 

S3^0 BBTD 2^90 

'^350 PRINT ":"r 

?340 EF lj>9 THEN 2i90 

2370 PIIIFtT " "|CHH1[^>*fi]T''r"r 

2330 OOTD 2490 

2390 PniHT "1";i:HP*^JB*13iri*i 

2100 BCTO 2490 

2410 fRIKT '■OQau"; 

7t2& EGTD 2^90 

2*30 PRINT W/f/"} 

?Mo ijOtd :***o 

2*50 IF F=2 THEN ?4&0 
?*aO PR(NT "i*ft"J 
?^70 GBTfl 2q9D 

2^80 PEirtT ■* **; 
2190 NEIT G 
2500 FRIHI 

2^]0 iriij:i f 

2520 HEST E 

2S30 PRINT 

25*0 REFllftN 

3DaO REN INSTPLICTTBti5 

aPlO PfiCHi 

3fl?0 PRINT " l-3a« 15 » Ifnpl* fllrategic jaji^ &]&Vffd on a 4:^r 

303O PSTENT "flTLO Ly kuc appasirt^ plsvet^i ^''i ^^^^ "=3^^ bEitfe*i1 VOU* 

3U10 PfiiNT "aftd ttit conpuHr. Thi grid i^ nuflbered t¥ follwit" 

aU50 LEI F2-0 

aOfiO FUR X=1 70 16 

307U LEJ B<i^^O 

30Sl} rtE):i K 

3090 OQSUB 2270 

3100 PRINT ■ The ^bhb 15 play*-) i*J.lh fouT piece^l h^lh" 

J110 PRINT "yoa IDd ttiB cottputfir- liave [Jnfr a^ aiid iriert are^' 

,^120 PPCNT "tHO ^lOKES' UMth *Pf Uifr] by &cilh players." 

3130 PRINT "play alwi^t b^^lni uitfi the pieCvs tin iht ftoarJ^' 

11*0 PR[IIT "in the folJoyiM^ p[^« 1 1 ] D^ 1 " 

3150 GOSUB 10P 

31^0 SOSUE 2270 

3165 FJtINT ^ICOftputiT- ll /p V"™ ^r* 03" 

JF64 PR1»T 

3(70 PRINT ' Tht Qhjecl of the ^ane 14 to pontaail yoUT" 04H" 

31S0 PRINT -L antf tfte tOI^tl lo prevent tlie dOnputtr frpn naving" 

31?0 PRINT "tta L^ Of CDur^ffp it li Irylii^ Id da the aiid t^ vdu"" 

32IJ0 PRINT "Tn n^vih /on ftu^t sl^pl^ BHtffr tlif fmar C4>[5r d 1 rta ti^ " 

3210 FiflifT '^uhfra i^eiu uant to r^l&ce VBLir L^ It nj^i rftalu oji tEte" 

J2Z0 PHIHT "bnard aOd liJIt no* cover any ui^7r pl*ct5. tou nust" 

3230 FRIHT "flOVtf yotJr L^ If you ciAMnot ririC i aiBU pQ^ition" 

3240 FAINT "^fur yA\^r Lf thta the canput^r haa ■fflCtlVGly pinT^Ed v^^i"* 

3:3U FRINI a ^Htf It UlTll thfl gaihc.^ 

J2ai> fRINT ■ ft^^uflinj VOO hSVfl (uccE^^fully nO^ed VOUn Lj yewi lany- 

327l> PRINT -tfcjvB trie optinn cf ftovin^ ^h^ tiQite^- ¥au iisy nOvt encp" 

32ei> PRINT -luOh sr hij>ae aC the to-^fi^ fry ^inftLy eiitermg th» j:oftr4aTiatt3' 

3290 PRINT "wher* yOU writ tu pul tfcen. TiJ loawe 9 tiQK yhei^& il Li/ 

3300 PRLnT "»Titpr it^ prE^ent poBEtiCinb" 

3310 PRINT " AftiF^ ^Ov (lOi-* irif hoKeiT it ii bp tO Ihf cotiputEr" 

3320 PRINT "U fifljJ i n&vt "f or 111 L Mfl fil&y qaatiFiuM irt Iht 5&ne' 

3330 PHINT "naiin»r* RtNtAbir t^iil you **U5t not only try to pin the" 

3340 fRlilT "cniipLiter^s L but at^o teep i^ojr awn L Ti^on bsing pinHed-" 

3350 PRUT "Al^Op it is ea^i«r lo |»Lhy t^t 99ae yith your i^iiil bonrd'' 

3360 PJ*l«T ''thsE ihe c4>BputBr printaut* lo rtiigrip enter OpPpO^O" 

3370 FRIIfT '■in ^IftCfl Qt ^nur naue. QBDB LBCi:"- 

33eD PRINT 

3^50 ttOTO 40 

4000 ENO 

OK 
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Life Expectancy 



This program is 3 li(e-expectancy 
lesl derived Irom Peter Passells book 
"How To." The leat asks you a series of 
questions dealing with your lite-style 
and environment At the end ot ihe 
questioning, the program gives your 
estimated life-ej'peciancy and the 
percentage of the population you 
should outlive. 

Vou may wish to espenment with 
certain variables lo see what effect I hey 
WIN have on your lifespan. It's unlikely 
that you want to change your sen, bul 
you may wish to check out the effect o' 
smcktng, drinkmg, mental attitude or 
weight. 

This program was uvnfren by John E. 
Rogers, 



IIHEee M IQU LIVE' 

B- tF lOU Ll^E in Alf VRUri APEA VETH ' 
Cp If TBU LJlfF IN K TOUJI UJflEW lOpOttU, 
[■ HEirPEIt. 



OV SB 14 EARn. 



P- IF tOti UQSH (fHTUli fi PESH. 
LI IF VDUn UOI't VEQIjIJfE^ HEAVF PHISICAL LUOB. 
]> HDlf DF T4E HDVL- 
CHOOaE one DF the lEItE'S A>GVE« 1 

H»V lOHE DO lOU EXEHCISE 3TKllVClV«l.r , 
ilEhnlS. iruiiUNG, somnUrQ. etc.i* 

Fi F1UE HUES A dCCK fDIt AR LEASt A HALE HOUIT. 
!■ JUST llhD 01^ THKE IIHE^ A VEEK. 
1- DO UHJ ElEB^I^E EH tHl5 tHEHIDN. 
ChDDSE DITE OF THE LCTTFIS AIOUE? H 

VHO PO rOH I.IU€ IIIIIFT 

H- If m ITiJI UIT-H II SPOL'SF, fffT^"!!, 0» H* A FWUT. 
H> If lOU-VE LIVED ALOHE FOfL l-lQ lEAlU 9INCE 4[^E 7^- 
fi- FOIf lk-2J TEAtS^ 
■- tm ?l-3e tFARS. 
El FOI 31 'AS lEAK^, 
H- flllBE TflAM 1C TEARS. 
CMtQSE ME BF THE L£1TEI£ UOVE* ■ 



LIFE tUPECTjlMCT 

CnEATlUE CBfPllTEItC 

iDRftlSTOITN, WEU JEI»ET 



'f-TSTCKE*" 

ID TOU SLEEP MOBC THBV 10 hOlSIQ A HlGHTt 

E" ta. 

E-IES s 
CVDOSE DKE OF THE LETIERS ABOUET 1 

f'UlENTAL ETATE'i4 

B- TF iUll A« lltiEHSEn flBBtESSlUE, DE E*5]U ANQtSEO. 
L* IF IQll AflE EAr GOI#B, RELATED, BP A FQLLOUEG^ 
I- HEIIHER^ 
CKDOSE ONE QF IHE LETTEtJ ABOVf' L 



mlB IS H LTFE EKPECIAflCT lEST- 

DD 10 J Mlilt IllSTIIUCTlOlfS' lEB 



mis la A TEST ID FKtCin IfTJIf LIFE EyPECTWCT. I 
HILL ASK TCU A SEFTIEE OF BI-DR^ UuESMBHS, 11HI[M IQL UILL 
fitPLI 11 nPldli T If THE C01l»t5POIlTiIlf6 AHSBEP TO THE 
out ST TOM. 

E-iHIPLEr UHAT 15 TQUA iEX^ 
K^inLE 
F-FEMflUE 
'S- AhP 'F' AEE THE PQSSl&LE tEPLTES TD THE WiflTlOH, ABSIIER 

LIVE T4IS: 

CHOOSE 04fE OF THE LETTERS ABOyET I 
TIPIW ftd '"' SIEHJFlEa VDU AH£ B H4LE. 



■■■illOU rOl F£EL4*» 
AfrE TQU HAFFT Ofl UKhAfPT* 
J* ^i^PPr. 
fl^ JHflAFPT. 
1- KEIEFIEII. 
CmiOSE OHE eF THE LETTERS ABflWE' J 

tt^FPCTOM'*' 

HAVE 'Oil HAD A SPEEBIifb llCHET Iff THE LAST lEflfrt 
H< TEI. 
I^IID- 
CHODaE ORE OF THE LEIICPt AAD1ET I 

■■4'TIICDIIE**-' 

ID IQII FARJI HOKE IHW iSflpfl^O A TEAS' 
9- TEa, 
I«IIQ. 
CMQlt^E DUE OF THE LET'EP^ A«OVE< ID 



ARE TOir riALE Qt fEllALE< 
fl' J14LE. 
F" FEnALf. 
ClK^OSf OWE QF THE LEtTE(t£ AMVE? H 



tttJCHaQLIN^ttt 

J= IF rOir HAVE FINISHED COLLEQE- 

L* IF rOU II4VE FISianED COUEfiE IflTH H QMTlilflTE 
or FS0Ft3SJ»HflL DEaHEF. 
It UnTHISG LISIELf, 
CHDO&L DHE CJf THE LETIEflS ADDVET 1 



a4 



AVE iDll t^ W DLTlER AKD ^'^H-L UOfKIMT 
Li lES. 

CHOOSE ONE OF THE LCIIERS ftllWE'' f 

K= IF ftH^ affl^KPPBENTS LTUEJ TO 89 YEARS OLH. 
Q- IF ftll fOIIR GPHHDPfl^EBTa LIWEB TB Bfl TEWS QLCf, 
]T no fiflMBPBPENT& LHjnLlFr IH THE AlOgE. 
CKOOSE □« Of IHE LETIEHS BBDUE? 1 



HAS fiifl PAftEfT 31ED OF 
BEfOFlE THE ADE UF 50? 
E" Its, 
]■ VD. 
CIDOSC ODE DF THE 



fi 5TMKE Oir HEAGI ATTACK 



LETTERS fbBQUET E 



♦tfFAHlLI liT5EASES'4* 

ANT Pf*£JIT, EHQTHttt, W SISTER SHIIEB M RPS lOB RAO 
CAHCEfi. ft HEART COBDiTIflP, Oft BlflBErEJ SlifCE CRUBHOOD? 

II' Tta. 

> HC 

ClfODSE QlfE OF THE IE ITERS *BO?E? 1 

'I'HEALIHi'i 

HDU PJCH IfO ■'^Li SHWE' 

A- IF »QU 5nQ'E HiTHF THAU TBD PACKS 4 IflY. 

fi OlfE TO TUO PACKS 4 HAT. 

B; OIIE HALF TO QKE PAGd A Ofl"- 

> DDR'T SHOHE. 

C1IDDSE Wi. OF THE LETTER9 ABOVE t 1 



tl rr TQU ARE DUEHllErGHT BT SO PffllWBS OS dORE. 
E^ OI/EJT HT ^0-^0 PDUIfDS. 

0- Dvcii Bi iO']( pQiinoa. 

T= "Or OIER OECOHT^ 
CHOOSE 0*rE OF THE LETIFBS flHDiJEI' T 

li'TOIIi Iftail fiftE A HAI^ OVER « MA^E fH 4N*«'SL CRECITUP' 

I> IF HO OR: HOT A HALE OFt ISIL^EH 40 TEAftS Dl-li. 
CHOOSE QfE OF THE LETTEffS AJDWE' I 

BO tmi IF tOU «E A UQHAN SEE A 1] (KECfll-DfllBr OWt A TtARl 

K= TES. 

Iw IF M OR HEIT A UOIAN, 
CHOOSE OME OF THE LETTERS AHUVC* I 

■ ■■iCUBREifT AGEi-'t 

K> IF TOU ARE BFTUEEII 30 HHP '« IEARS OLJI- 

L- lETUEEtf 1l> AND 3I>. 
f' lETUEEri S a AND 79. 
N- OOEH 79. 
I- IINOEF 30. 
CHOOSE ONE Of THE LETTERS ABO'^E'' I 

IDU ARE EJPECTED TO ll'JE TD THE AGE W 76 TEAIfS 
WT LlOlna ill OF THE HEM ■« i'l » THE IfOKEN, 

at 



t-fiKINK*** 

HO Vnil LfflffK THE EQUIWtEII^ DF A 
OUARTEK BOTTLE OF flLCDHOLlC BEVEHAflC 4 BfiT? 
H' lES. 
1= HO. 
CVam ONE QF THE LETTERS ABQVEf I 




H5 



PHlUT TflBl3lJ:-l.TFE CJPECISHCT- 

<» PfflflT I«(?OJi"i:MflTlVE CartPUIIhQ" 

Lt PUBT Tftfilia);-|IIH:llISTaUN, NEW JEfiStl- 

^Q PS|lll:PRIN1[Pltl'IE 

i7a PPINT iPSIKTiFlHI'I 

>B0 PHIHT "IHia IS fl LIFE FXPtCT*NCl lEST," 

m PFLiHi ■ ffQ laj uian inBTBUCrEona-i 

EDO IKPUI M 

JIJ [f tEFTim,l>='lf [HEN 17» 

1» PRiI*|'-^"tHIS is ft TE5I TQ PREHieT -fOUR Mff EIPECIftltftf. 1" 
3511 PBllfT -mL 431! TBU ft SEfllE? if 5HIIPT a^fTfOltS, UHLCH TDU UTLL 

34l> PUNt -FlEPLl B* TlPIUfl H THE CBPBEarQlfJlINa UQUER 10 1W£" 

J?|J PilHT -nUEBTlttN-" 

390 Pfrltll 

3?fi PRHI - tTllBPLtT n*1 IB lOUB 9£xr 

1011 PIflllT ■ rt-«ftLF- ^^ 

ill rlYti -'H' ft»l 'F' fiPf TIS PQSSIILE MPLIES TQ THE QSlCSTIO UEP" 

4^0 Fitiifi -LICE TPier- 

,W Mini - CHODSE DNC C* TiE LI11IK flfiavt' H" 

ir>0 PBlUT "nPlHB ftH 'fl' aiWlFlEB tOJ ARE ft Mlt." 

4tO PPTilTiPiriNTlPRlHI 

47C fi^-l 

4flO Z=?? 

1T0 ftt.-fttCBElteHTJKlFNO" 

500 GDIQ l?DO 

550 If fil??1 TTKH 1»« 

53fl DftTU ■ i"9 £>:•*♦- 

5*0 Bfttft -flffE lOU flfllE IK FtnftLET" 

510 BflTft '«' «il-E.- 

540 EATIl ■ F-: FElMLE," 

5^0 Hftlfl ?f-|lf" 

3H0 LtftT* -"--"LIFE ST^LE-'i-'" 

^fO aaift -UHEdE BD IQJ LIVE''" 

flSO BfiTA -fl- IF lOU LWE IN ftH <!fi^H fiVEfl UriM fi POPIKflTTD** BVEfi ll HII." 

AIA Bfllfl ■*!= [F TOU LIUE IN * TCUJI tlHOtR I0,0OiJh UA IJJ* ft FSRI^" 

420 IWlft ' 1' NEITHES.- 

6]l> [iftTrt 3,"QKI' 

a4» [riiT£ -hOU ID TOU llDltl*' 

450 BliTfl -ri' IF 10 J UCBK lEHJHD ft BEK." 

4tV CRTfl -L' If yOUk f\m PEOJIPfS HEftn PWtSlCW- LflHQR.- 

67tl DftTA ■ 1= *□« OF THE ABJlE.- 

6Bl> DftTft ),-|lL[~ 

dVa BfiTft -HDU LOne DQ ^nil tXEBCISE BTPtlfUaJSlT,- 

?|>|J CflTli^lTEIlNIS, EJNHlirS, lUlllUHe, ETCJl" 

710 liftJA -f= Fll/E riHES ft lltEK FOR PS ^F*51 « Hffl-F HOUP." 

?20 Dftlft -K« JUST TllC Qfi TUSEE IliEB ;i UCEK." 

?H BflTfl " 1= BO hOT EJEItCIBE IN Tffia FflSHiQIf." 

?« IflTft i,-fti|- 

?5i} eflT* "UiO DO TBU HUE UITH'" 

?6( DAEll -II' IF TBL LIJ£ UTIH fl aPOtfSE, FWIENS, DP IH fl FftniLT." 

770 Iftlft -11= IF rilD'VE LIliEII *lQilE fOE )-10 TEflPg SINtE HBE 21. 

7fifl [fftlft -0= fOB ll-2i> tEflRS.- 

790 BftTft -n^ FBS 21-15 lEftRS." 

Hl}5 IflTfl 'E= FDIl 3r-40 VEftPSJ' 

Eia Dflr* ■ B- (IDITE THM 40 ■EftSS.'' 

B20 HATft d,-llll6nEI' 

a JO LmTA ■I'-'PSTCHEi'-H- 

Q<0 BliTft -DO TBI! 9LEEP IIFRE TriAH 10 HOUVS A rflOtlT^' 

B^m BtTft '> «-■ 
340 BflTfl ■ E=tE6.- 

870 DftTA JpTE- 

a^O DATA -f^nENTftl aTftTE"'" 

B?0 »liTft ■(!■: JF inV ARE IHTENaE, fl&aPE5alll£, QB EAaiU flIfljEREB." 

9flfl BflTft -1° IF rOU ARE EftST flDl«T HELfllEB, W A FULLBUEP.- 

9IB tflTft - 1= NETTMEB." 

$20 BflEI 3,-ALI- 

^30 LATA ■♦t*HDU rOJ FEEL"'" 

»»0 DATA -ftHE TDU HftPPf DR UNHAPPf" 

no BftTA ■> BftPPI.' 

9i0 DftTA -6= OlfllftPPl." 

9/0 BflTfl ■ 1= NEilHEIf-" 

9K IflTA i,-JBI- 

9»0 DRTfl "HtffttTOIfSt**' 

1*00 BftTfl -HAVE TBLI NAD A SPEEMBG TICKET TU THE lAat TEflBT" 

1t1D BflTfl 'H? Iti.- 

1020 Ifllfl - !=«." 

ID^O DATA ^h'HI" 

111*0 DATA -"♦HfCWE'"'* 

1050 DftTfl -EO TBI EARN flORE Tififl ISD.ODO ' 'fcABT- 

TOflO BflTfl -D" VE3.- 

T(?0 BflTfl ■ IMQ.- 

IDBO IflTfl 2,-ei- 

I0»0 DATA ■►■'►SCHODLINO'I*- 

tlOO IrftTA -J- IF mil HAUE FlUTSHEO COH-EM." 

1111} BATA -i.' TF (BU HAVE fllfrSHEB COLlEBE UHH fl OHABUAlE" 



HEflBT ATTACX- 



nZU IflTfl -QB PR0FES51l!NftL BEGPEE." 

IIJO BflTfl - !■ NOTHiNft lISTEB.'* 

11*0 IiATA 3,"JLI" 

■1150 DftTft ■'"AGF"-"- 

1140 BflTft "ABE lOU 43 OB DLBER ANB aULL MDRKinO?- 

1170 BflTfl "1= 'E5.- 

HBO DATA ■ !■ HB," 

1190 DATA !,"LI'' 

1700 BflTft ■t-^'HEBEDIIS'-"*'' 

1210 BflTfl 't- IF ftNT BflABBPfl»E*rfl ITVEB Tfl B5 TEAHB OLD." 

1J?0 SATfl '0' IF fllL FQJP bt^JJEPAREflTa LmD TO SO TEPB3 DLI. 

MiV DATA ■ I- M BPftNPPflREdTa OJflllFT IN THE ABOVE," 

IJ40 DflTfl 3,-KOI- 

l?!0 BflTfl -HftS fltfl PflfiEUr BTEB OF • 3TBDH& 

1240 iflTfl -BEFBKE THE flOE OF 50?" 

1J70 DftTA ■E= lEa,- 

IJBO BftTfl ■ > IfO." 

[2?0 BflTfl ?,"EI- 

HH BflTfl ■♦•♦FflftlLI BISEflSES*--*" 

lifO DftTft -ftl" PflPEBT, BBOJHEB. QR SISTER UNBER 50 HftS fOR >^''*^ 

]m [.ftTft -CANCEP, A HEflBT tO^BITEON, DB llAIETES SlIICE CBIIB«OOD?- 

1130 QflTfl -H= fEfl." 

13<0 BflTfl - \' NO." 

liSO DATfl 2,'fll- 

lifiH DftTft "t**H£*lTH'i*- 

13fi6 BflTfl "HOU HUGH ID ^OU EflOKE'" 

13P0 BflTfl -A" IF TOU SNOHE HDftE THAN TWO PACK A DAT-" 

1310 BATfi 'C« OBE TQ THO PftCKS fl IflT." 

MfO DATA -N= ONE HfllF TD QBE FflCK A MS." 

1*00 DATft " 3= BQ«'T SHQKE." 

|*ll> bftlft 4,-flCH|- 

H20 BflTfl -innPII^K't*- 

H3e BflTfl -DB rau DPlltK THE EUUlUAtEUT DF A ' 

]**0 BATfl -OUARTEP BOTTLE QF iiLCOHDLIC MVERABE A Bfl^T" 

1*50 DATA "H= TEa-- 

1*60 BflTft " !■ NO,' 

1*70 BflTfl 7,"HI- 

1*00 EATA -t^UEIBHT--**" 

1*»0 TiATA "A* If TOL ABE OUERUETGHT Bf 50 PQUNIIS OR HOBE." 

1500 DftTft "E= OOES B1 30-50 POI]«S." 
1S10 BflTfl -fi- DVIR BI 10-30 POUtfOa," 
1120 BflTfl ■ I- NOT BVER JEIGHT." 
1S3Q BflTfl 4,-llEGr' 

ISbO DftTA -tTim IF rOU are a hale OUCB 40 HAVE All ABHQAL CHECNUF^- 

1U0 OftTA "K" lES." 

1570 BflTft " f= If BO DB ROT fl HALE OB DHDER 40 Ttflft* OLD." 

I'So BflTfl -OD rOJ' Ef lOU ARE fl UOHflfJ SEE fl OiNECOLDOIST BBCE A TEMfT 

laOO DATA -K- lES.- 

1410 ma - 1= IF HD DB NBT fl UDIIftil." 

5*10 BftTA 2,-Kl- 

U30 BflTfl ■■■■iCUll»EdT AeE"*"- 

IHt BflTfl -i;^ IF lOU AflE BETUEErt JO AHft 40 YEARS QLB,' 

1450 DflTfl -i- BEIIIEEII 40 flIfL 50." 

1B40 DATA ■F= BElUEF* 50 BID 70, " 

1470 BftTn "H- 3l»EB 70." 

uaa BflTft " > urfBER JO.-- 

U90 BflTfl S.'ILFJII" 

I'OO FOR 0-1 TD 7 

1711) BEftO SI 

1720 IF lEfTKIH.l)-" ■ TBEH 1710 

T730 PRINT ' "JOI 

1740 NEKt 

1750 PBINT " -in* 

i:<4D PEfts i:,ci 

177D PBIIfT "CHaoaE QHE UF TBE LETTERS flBUliE"; 

1790 IHPJT Gl 

1790 EQB C?«1 TD C 

IBOa IF L£FT1lfitT>J' fll»>Ci:t,C3,1» THEH IBIQ 

|fll« NEIT C2 

18311 SBTO 1770 

1130 fftllfT 

1940 FOB il-1 TO IS 

1850 IF LEFIKOpfJ-niBILfllplfpO TWEH 1B70 

1B«0 NEKT N 

1H70 riH-<t 

1BH0 fltt 

leVO fiQTB 510 

1900 PRINT "lOU ARE E»P£CT£D TO IIVE 10 THE AIE UF-JIJ-ltABB- 

1910 IF Z<ifl THEN (?flO 

ttiU FOB T:4D TD Z STEP 5 

1^30 REfllr Hl.FI 

jf40 UIX7 r 

1 m DftTA ■ ?i 1- , - 1 3 V , - HI" , '2n'- , " 4n' , "Sll- , "( H - , -191' 

1 m oflT fl ■ 7SX- , -531- ,"sn;- ?oi- , ■ 94i - , -as r- , -99 .'i " . ■'? -fti" 

1?70 PflHT -OUT IJWTNG ■;(!■;■ DF THE HEN flHB ■jUi" OF THE UBHEC" 

IfflO ENB 
01: 
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Lissajous 



This program prints Lissajous 
patterns. You enter relative X and Y 
frequencies and the Y pha$e of pi- The 
refativefrequenciesforXandYmustbe 
a posihve number one or graaier. The 
phase may be between lero and any 
number you want 

We have experimenled with a wide 
range of relative frequencies and 
phases and come up u^ith some 
start linglybeautlluE patterns. Some are 
starkly plain while others are amazing- 
ly compfex. H the frequencies go much 
beyond nine or ten. the paiterns 
generally become jumbled and difficult 
to decipher particuFarly if they are 
being printed out on the normal hard 
copy terminal. Neuerlheless, it's fun to 
experiment. 

This program was originally written 
by Larry Ruane and modified by 
several other people along the line. It 
appeared first pn Cresliv^ CompuUng, 
Sep/Oct 1977, 
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LISSAJOUS 



Liaujous 

CRE4T1HE tOHPUTLHD 
MMtUlDUl HEU JEfrStT 



DELATE VE fFEEO. fEt X^ 3 
RELAriVE ritEQ. flHl T^ t 
Y PHASLt flBLTlFLE OF Pit 
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* t 



ULUIV£ FtEB. Fit TT 2 
\ fMSEp *WLllPt£ OF Pr * 
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4 4 « * 
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* # 

* * * • 

4 4 t 4 

'4 * 4 

4 4 * 4 

4 4 1 4 

4 4 t 

4 4 4 

+ 4 

4 4 4 

■ 4 4 

* » • I 

* * * * 
4 « 4 4 

4 » 4 4 

* 4 4 t 

* 4 * t 

t 4 

* • P 4 

* * « * 

' * 4 4 

* * 4 '• 

4 4 4 4 

4 4 4 

4 * ' 4 

* t 4 4 
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CIEitllliE CDHPIITlHG 
HMdlSmiM VEU JEffSEr 



RELAiiiiE ma. roR a z 

REL4TIIIE FREfl- FOB rt ? 
1 PUfiSC, HOLTEPLE OF PIT 4 
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ftEiaXISE FftEO- FDR IT 1 
ftEL*TlVE FREO. F« Tt I 
T ^lUSEt HIJLITPtE Of PIT .5 
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1 i:^r-*s?^(i^ 






llHPUT FI:Tf lITtFI} < F1 THEFf 120 



lIVPUT F2:IF IVUm < F3 THEN 13(1 



2t puifi iftBifflt:-c*!Efir:yE caflPuiiHG- 
3« pviht TAGci«);~noitPiin]iiN nci jerbei 

_10 PBLllT[P*l(ITTmilT 

3fl tin YfiJ} 

-1DH> flEh- BlFP-UISf lESSAJDlJS 

110 P':3.I<I^9Z& 

l» PilHI -RElfiTlVE FItEQ. FOff X"! 

122 IF PI ( I IriEk ilO 

J?a F?fl:FT2"P"F1 

Ut PfiJBT -BCLflTIiFE FSEll. FOl! V, 

13J Tf F7 < 1 THEH 13C 

IS!I PRIHt ■1' PHUSE, niH-IIFLE QF PJ-jflUPUT P2:r2^P»P3 

na rj"?tp»F? 

I^D fOG H^'ie TO 19 

UD X-XiyiaTQOSUB IV74:T|iT:T3'P-1 

Ii7 FOR ]"0 TO F-1 

lis TJ«(If-3»]tP]/F1:T4:'<ll»2''I"P)/f( 

T7CI rTlO"5[*HP:»T3'P7):T?=30'SJ«^F2*rfl'P?> 

1?0 r<2»ll«l'llT(?<l'l>°T? 

20l> IfElT 1 

311} F9E J"l TO ?<F-li1^J'1lT*V(J) 

?7i} IF T )' lllk THEN 2<0 

2S0 14Itn = T11]:I=l-lllF I J'O THEN 2» 

340 tl[»T>«TjllE:fI J 

3Vl FOIt I'O TQ 2-F-1 

240 Tf 1-C 14EH ^0 

270 TF ■rilh-td-l] IrttH 2?0 f- 



— S90-PllHT-^flBTJ4 * T f 1*1 J"'" " • 

sm HEJIT 1 

saa PB1IIT 
j>i} ne:(i ji 

I9¥l> STOP 

IfiO REM:— 

1f?i| IF ABSCl) < .1 THEN 7070 

1990 1=K/19fl»l1t^»-'SBfrM-lIJ 

IffO QOSUT 1?70 

?O00 X'2fX 

2010 PETIIRN 

2520 l:-T♦J-l/4".W3«'^^l|-?/72,1 

2»30 HETUHR 

2041) EIID 

Ot 
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nagic square 



WeVe all seen examples ot magic 
squares The most common one is & 
3x3 square jsing I he mregers 1 
thro jgh 9 In which the gum of each row, 
column and diagonal totals 15. 

In Ihe compuler game of "Magic 
Square" the goal is to form a sum 15 
magic square with you and the com- 
puter aliernately fitling In the inregers 
between 1 and 9. If one player stumbles 
and puts a number m which causes Tlie 
sum of a row, column, or diagonal to be 
something oiherthan 15, he loses. 

In forming a sum 15 magic square, 
thare isonly onefurdamenlalsoluiion. 
However, if can be rotated and reversed 
to form 8 solutions. Because the 
computer does not play a particularly 
creative game, all eight solutions 
cannot be obtained How many can be? 

Can you modify the computer 
program to play a more mteresling 
game wliich permits all ei9hi 
solutions? (Hinr Try randomizing the 
move position and number generators 

io Statements 400 and 410 ) 

This program was created by David 
Ahl and origirially appeared m Cfeativ0 

CompuUng. Jan/Feb 1975, 
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HADIC 



hdEUrlSIOllH 



ntJ,JElf^ET 



UJHE DF llfieiC S(IU4f:t 

PUtlEltS ALTEGHfiTLFr CHDOSC aH INTEBEIT ft JQ It 
TWT M*H HUT tUH Peei;|fll>Slt USLI tWl PLACE [T 
Til AHI UHFELLED CfLL OF A T | C ' I'l:- T DE lOARD. 
TIE QDAL 15 IS I9»E THE 31IJI DF EACH ROW. taiUtriT 
an llAQOITfiL EHUiU- TO 19^ 



TKE SUA OF ruE 
m DIAGDKAL 



TUP I fLtlit L05f5 UlfQ Tin^T HdKES 
ThPtE FIBUIIE3 Lh 44 T 0011, i:(]LUtllf, 
SDIETIIIirS OTHEir THim 1?. 

h TIC eAnE sHmis t mace soufiRCf* 



THE CBfl^ElTEf UILL 4S»r tail 04 EflCH FUVE UHlCh 
CELL IDU Ifl^ TO OCCUPI, M» THE VUKBEr tDU III 311 

LIK 1.7' IF rUlf UiaMElf TD PBT * 7 It CELL 3. 

HfFE ARE THE CELL HirHEEP^E 



1 2 i 
4 S A 

7 9 9 




larm Toufr kduc — 


- i:£LL fim HUrtBER' 1,1 


1 • 
» 1 
t • 


* 
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I HOVE TO ecu. 7 


UlTH A Z 


I 2 
9 D 
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inf ji TDUff neve " 


- CELL M& NIWMRT 3,' 


f I 


1 


0' 


I flOVE TO CELL 4 


UTTM 4 3 


1 1 
J t 


» 



[tfUT TDJt NDI'E — CELL ilPI 4irn£ElfT l.i 
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1 








Mmit 'ou lOflC - ificE mr- 
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l*IPUT TBUH HOVt — CELL AHIl HUMHER? 1,1 














IBPUT raUR MOl^E — CELL *ne fiUttBER' 4,S 



1 

4 



2 







s 



I HIV£ TC CELL S UITM f^i 



1 flQiJC TO CELL 2 UJTH d 2 

1 
C 




2 
« 



2 

1 



5 

9 



[NPUT TOUf! HBVE "- HLL flrtH NUHBERT Jp7 



iilPUT imk ftQVE — CELL AWL tUIHlEftr ¥^¥ 



2 





C 

9 



5 



sinVt voii Lttsc -- «ij:e tr-t. 



I tlQUC TO CELL 4 UlTH A 3 

1 a 



LIST 

5 PfilHT 



TAI 



(2fl^;" 



GAne OF JCAGIC SQUARE- 

KflrEBS flLlERBilLEl CHOOSE ftN IHTEGER n TO H' 

TT^AT TfA^ NI^T BEEN PfrElFIDUSLf USED Am PLACE If" 

IH j^HV OKflLLEU CELL OF A TCC-TAC-TOE SOAfiS." 



92 
93 
?^ 
95 
?A 

9E 

IDS 
11D 

Mi 
tic 

2111) 

310 
2]\ 
ZJO 



PfriMT IAEM5] 

DIN ACn^ECf] 

PBIMT 

PftLITT 

P»[liT 

PREMT 

fRIHT 

PftlAT 

Fffm 

PRIST 

Pffm 'THE 
PRINT 'flNIf 
PRIJfT 
PRINT 

PRINT 
PBINI 
PRINT 
PfilHT 
ftlNT 
PRINT 
PHUT 
PR] Ml 
PREttT 

PRTMT 

PRIflT "1 3 a" 
PfflflT U 3 4" 
PRINT ■? fl 9" 

FOR I = I TQ 
All»'0 

NEIT I 

I H^oiy-0 

PRINT 

PUNT 'INPUT 

1RPLJ7 [^M 

If U* OR I > 

IF Adl'O AMU 

PRINT "ILLEflAL 

eOTO IDJ 

A{l)kRiE{N}>1in> 

enSUD 740 

eosjD aoc 

IF U-O THEiJ ?30 



NAQIC SJ3UARE'' 

-^CREATIVE conp^urEnb 



HDBfri STOCK MEi^ JERSEY* 



eOAL IS TO NAKE THE SUH 

liIAODMAL EONAL TD 15." 



OF EACH RflU^ COLDflN^- 



THfc SUh OF THE' 
n OlAfiDHAL" 



*TtlAT PLATER LOSEB tfJID FIflST MKE^ 
'THREE FIQURES IN AMT ICOtIt COLUiMp 
'SOhETHTNg OTHER THAN 13." 

'A TIE UHE IffflHS A nA6IC SOUdPEir 



"THE CQHPUTEP DELL ASl! YOU QN EACH i^^E VHKH" 
"CELL TOU Ul^H TO DDCUPTt AND THE MUflBLH lOU Ul^H" 
"LIKE '3f7' IF THU UISHEE ID PUT A ^ ^fl CELL l^"* 

"HERE AflE THE CEIL BUJIBER^:" 



tQJR HOVE CELL AKE tiOflEER' 



f flR M < 1 OR N 
(N3<0 THEN 130 

HOVE ..* f^^l^"" 

'H-+1 



> T THEN 130 



PBINT -SDRRTp TQU LOSE — NICE TRY.' 

eOTB SAD 

IF H < 5 THEN 4»0 



2« PRIilT "A TIE OflflE - BUT UE'^TE DRiWN A HAfllC SQlJAfl 

250 QOTfl 540 

44« FOR Q-1 TB ? 

41(1 If ACB^> TttEEf *B* 

HlZfl FUR E=1 TO ? 

414 If S^(i?>0 THEN 470 

435 ACfl^=R 

4i\^ ODSUS BOO 

490 IF U=0 THEN SCO 

AfrO 11|il]tRMR:U30lA^B3p^ 

470 WEltT R 

4B0 tiExi a 

4f0 U=1:R=RI:[l=QI:ri^tQ3=« 
500 BCItJ'l 

520 PRIilT "J flaVE TO CELL ";([" UlTtT A '^R 
3^0 QOSUl fin 

540 If «»0 THEH 103 

550 Fftlifl "I LOSE tOU UIHM- 

ItU PREMT 

541 fDR 1=1 TO 19 
3£2 PRINT [:HR$<7^ 

9i< NEXT I 

5?0 PRINT '^LET-'S PLAT AGAIN, - ." 

Z?i SOTO ?fi 

BOO FOfr X>l TO 3 

aiO ON X BQTfl B 20^ 330 p 840^930, 940 ^870 pOBQ,S70 

920 J=1:K>=2lL^3teDTD fi}0 
S30 H**;L"^fflOTO 500 
B40 k£=5:L=f:BDTa ^0 
S30 J«4lL-4lO0TO TOO 

SAO >2:L-S:GQTa ?00 
S70 J^3:L=?S0QTQ ?00 

J-=7;L-fl;BDTQ ?00 

J»7tK'S 

900 IF ACJ5=0 OR AlKMO OR rt[L^■0 rHfJl ?J0 
?20 TF A^J?-^A4K^t-A(i) O 15 THEN f40 
^30 JfEUT H 
935 ODTD ?50 
9^0 tf^j 
9)0 ItETOSN 
?40 PBINT 

9^5 PRINT AM^ACS^ACl^ 
970 PRINT A{4hpAC53rAC4^ 
?73 PRINT AC7^AC8^Atf^ 
900 PB1UT 
?TiJ RETU4II 
¥ff EftD 
U 
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Han-Eating Rabbit 



1Q0 



\n this game you are in a pit with a 
man-eating rabbit. The cenler of the 
pit, approprialety enough. Is at 0^0, and 
It has a radius of ten. On each move, 
you can move ir\ any one of eight 
different angles, 0, 45. 90, 135 .. . etc. 
Unlike you, the rabbit can take more 
than one hop on a move. The object ot 
the game is to avoid the rabbit for ten 
moves. If you do this successfully you'll 
be released and set free 

We're not sure what race of people 
on what planet dreamed up this 
diabolical sport, but we've found that 
it's extremely difficult to get away from 
the rabbit in more than about one out of 
tengames You may, therefore, wantto 
improve the odds somewhat by limiting 
the number o! moves The rabbit can 
makeon each turn lo one or twOr You'll 
find it Interesting to graph the results of 
the program as you go along. To do 
this, you'll need a piece ot quadrille 
paper at least 21 squares in each 
direction. Draw a circJe with your 
compass ten units In diameter and then 
number the grid from minustenioplus 
ten along the X and V axes. Plot your 
moves as you go along and you'll see 
some interesting patterns develop 

This program was conceivecJ and 
written by Philip St an way. 
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270 



nOftfilSTDUN^ NEiJ JENNET 



TBU ACE IH A PIT BITrt il fll.«-lATIW& RfllBIT- 

THE I^FMTFIt IS i^,t\ MfD II HA& A RAHIUS OF 30 

IF TDU CAM W^\]> tIfE HABBIT Flit 10 HQUES VCI|I VIU BE 

(tELCil^S^ lOU AND ThE ftAJilT CAN NflVE DHLt I SPACE EACIf 

HBIfEveit mt EAltIT CAN 10 NVUIPLE JUHP^. 

tOU CAN TIAUEL AT THESE MBL£S 

C|43rn^1»t1«f3!9»Z?^p3t9T34D 



HHEltt UDlltD you LihE TO BE CMPf£!>T 2pJ 
NABI[T AT 4 2 p 7 h Mil DESTMCE 4 

milri 1 I HUNAN AT t ; ^ 3 ) 

Ar UhAT AHeit 11 lU TGU AlW T 270 

RDKNIHE ^^^.^.HUrtAN TDU AAE t^OU AT [ 7 p 2 h 

THE ftASIET T3 FDUJICIME A1 A^ei.£.««.^ 27C 

THE (EABBLT LS rOUHCTME AT AHBLE 270 

KAfBIT Al C Z t 1 > AHB AlSlMCE 3 

TUtlf i 2 HUIIAN AT 1 2 ^ 2 > 
AT VHAT HBLE UIU rni HUN ^ ^25 

RHMIH^ HUHAIt TOU AflE HOLf jRT M t 1 > 

THE BAIBH IS PDUHCIMO AT ANOLE*.... 27l> 
THE BABBIT 15 POUNClHJ J^l ANGLE^.^^. 270 
(TABIIT AT ( J p 3 ) AND DISTANCE 2.?3£l?7 

TBItf I 3 HlMAif IlT C 1 p 1 I 

AT UWI AHeiE VILL TQU RJ# T Z2J 

RlHfllAB ^.^.^^HUmfl TEIU AflE HOH AT 4 C p » > 

THE EABtlT IS POUflCIflE Al AHSLC.^^., 22S 

RA1BTT AT [ 1 ^ J » AND HISTAMCE 2^23407 

EUBN t 4 WINAH AT C , D ) 
AT LHAT AHBLE VJU. TBU RUN T 22S 

JttfNNIHfl HLiflAN TDU ARE NOU AT [-1 p-1 \ 

Ut IfABBET IS BOUNCING AT AHU-.^,- 22;^ 
RABlJI AT ^ t t ] AMEi IISTAflCF 2,^^*07 

TflB(f I S MUnAH AT l-t +-1 ) 
A1 UHAT ANCLE UTU Vmj BUN » 270 

RBNfllVb ^>\\M\M TQU AH£ HBU AT C-1 ,-3 > 

THE BABBIT IS rOUNCIK^ AT ANSLE^.^^. 2?D 
RiSAIT AT ( D p C ) AMD D]STAII[:E 2.23^47 

TIBM 1 A H0JIA41 AT f-1 p-? > 

AT iJKAT AHftLE UlLL TOU fmtT t 221 

BBHNENS ,.,.., HUn«t TOIF ARE M]LI AT \-Z ,3 ) 

THE BABJIT 1^ P1»UK[:lflQ At AN4]L£^^««. 22S 

THE BABHT IS PftJ*#C1* AT AW8LE..-.- 225 

THE RABffIT ]3 FDIWCIKQ AT ANOLE«»-«. 27C 

RABBIT AT {-2 ,-3 h ANI^ DISTANCE 

A^CrUHCH** HELL B^E^^. 

Ok 



92 



LIST 

I PRIHT TAI(20 3;"NAH-EATIMG Rf^SBIT" 
Z PRlHt TflBi?Ch;"CPEflTlVE caNPUTIBQ'^ 
i PfflffT TflSffef]"N(lFtfiISTOUH^ NfU Jfftgn* 
4 t'RIMT^PRLftTzPPlNT 



13 

;7D 

25 
2i 
2? 
2S 

^l 

A^ 
Ai 
A7 

4e 

51 

6J 

^i 
^? 
&f 
7D 
^1 
Ql^ 

?1 
1» 

lie 
in 

TI2 

nj 

t2fl 
121 

no 



PHIMT 
PRltiT 
PFfiiH 
PRIitT 

PRIHT 
FRIBT 



"TOU AFE JN 
"THE CINTER 
^]f TOU CftN 
"RELtftSEL. 
-i|i3H£ytR THE 



A PIT tfETH A rlAN-EAtJirQ 
rS ^CpO? AND IT HAS A 
AL^Dlfr THF RABBIT FOR l 
raU AND THE RA 
9ltT CAEJ DO 



£IT CAH HOVE QNLT 
HDLTIfLE JUMPS, - 



ffftBBI1*■ 

lUS OF ID" 
nOVES TOU DILL ?E" 

1 SPACE EACH^ 



TDU ElAN TKAiJLL AT THESE ANGLES" 
(lr^5p?0^T]J^]94^2Zat2?4i3lSp36iJ" 

■riiNT(2i»iriiin>']0* 
p-ii?pcA&si(j|-m r;+iT-"Ti r^>^ 

IF D>fC THEM 40 

PflINT 

PE[NT 

PCLMT 'UHfRE UOULU TOU LIKE TO BE URaPPEB"; 

ItfPlJT u^ti 

Lf ^i}RiABsar24-rr2i3>io theh so 

[f XOXl THEil ?0 

If TOT! TttEU '0 

PIE 1*1 T "*«**g0UI5R*"^t" 

PRIilT ^HE RABSIT IS lEAQ^ YOU ARE ^T FRE^fo^qoTD 

FBR fl^l TO TO 

PRlftT "RABBIT AT i^fHi^p'^jT!" J A*JD nrSTAilCE ';t 

TF [h=0 THEN 330 

PRIBTiPflHT "TUFtH i"!flr HUHAH Al r ;XI?-^^;Ylr"I* 

PBrUT "^AT UHAT AHSLE UIU TOU RUH ''; 

I^PUT f\ 

IT li/450IilT"<A/45] IHEF* lOO 

PITIMT "RUNillilE '';^PI^1 

tt*ltlf fiBSiaHTlfi/10?*l0^-A)O5 TKEN 121 

MSOR4 2] 

i2=[HfL05(ATi.H11?/1?aM| 

r2= CH^I^INIA* L3. 1415^/1 BO? n 

IF 5QR(l(J!HTJ>*?+iri+T2r23K'10 THEH 13C 

PRINT *rDU CAM^T QQ ElfTD A UALLlI"* 

DOTO l«l> 

T3=[HTaiflODOr/1@O0 + :(3 



1« 



135 PRINT *ttUMM TOU AfiE KOU flT CjHi'/jyi ;")* 

1J4 IF XOX1 TNEH 140 

13? IF T<?T1 TJIEB HO 

13S PRINT -TOO BAN RIOHT IMTQ THE BABBIT!!'" 

Uf IJQTD ^31} 

1*D PRINT -THE ftABUT 15 fOUWCJNO AF AB6LE-.-..";iPl'Pl4l 

ISU «*n'IiTJ^Tl-Y 

1?1 IF X2-0 THEH ?8Q 

15? IF T2-5 THEiii JBiJ 

1&D B=INT<ATNCABSHT2/X2>M/C3.I-41S?/1B[)}J 

1?i> ON SONUZr^? OOTD 190^10^360 

1B4 DN S0Ner2h^2 SOTO 240^10^250 

17D □» S6Ne'f2^«2 £GTO 230^10^220 

2?l> B«iei>-BlOOTO Z» 

:2ja B-BtieaiODio zao 

24i> BE344-9 

25J B=INTCa/^5*-5>*45iPflINT B 

2K H^i 

25A IF ABSaiflT(Byi0?*10)-BhO5 THEN 244 

2&D ]:2^eH*CDS[B*CJ.141?V/lSO>)) 
2&1 rf-C^*S[l1[B«C].Ul9«/i80in 
2?0 I«IilT(I*X2**5h 

271 T«INrCTfT!**5k 

272 BOTD 33 5 

JB» IF T?<0 THEM ?70 

391 B^H^GOTO 315 

270 B*27O:CDT0 730 

344 LF r2<0 THEfl 310 

341 B=^1:aDTD 2S0 

3ie BilSDiGOTQ ZSi> 

315 JF SttR<CX-)!l)'2+CT-ri 1*3)^0 THEK 323 

320 F^£ilTIPl^RirBCt]+l] 

321 IF F01 THEN 123 
il?? eOTO 140 

323 ttEXT B^PRIHT 'TOli ARE If ELf MSEl ■ " I BDtO 340 

330 FJtrtfT "•*CRUHCI1** JELL R,E-P.'' 

340 EJIB 
Dl 




Haneuvers 



In this gam© you are nraneuvering In 
B corner of space shaped, interestingly 
enough, like acube. The dimensions of 
tfiecube are ten parseca on a side. The 
bases are at the corners as shown on 
the diagram v/^th Ihe sample run. There 
are four slar bases located at corners of 
the cube which you must visit in order. 
A, B, C, and D, to deliver a message to 
them- While It is a fairly sirnple maiterto 
get to Base A, the other bases 
sometimes prove somewhat elusive- 
One possibility would be to use a 
second computer to compute your 
cou^Ee^ or even compute the course 
before you start the game and then 
teed it in. Would this ba cheating? I 
don't think so because the Isarnlng 
value in writing a program to compute 
your course will teach you more about 
the game than probably fifty plays of it 
On The other hand, which is more fun? 
That's for you to find out 

This program was written by John C. 

Russ, 



RUK 



Cl:E<^TIVE CQJIPUTEHII 
|tD(rf|$r(H]U« EritU JECSET 



IHT TBO NEEIi I H5 Tfl If C i L 0H£-^ V£5 



T9U «E THE PILDI OF THE EN T Eftf^R I SE "^ S 
YIU I^UST KlIVIR A JfES&AljE TO £aCh ClF 



SPACE SHUTTIE. 

FDUrt STARBASESt 
]H THE LtilST TftTAL TIME. TITtliJ HErjAL PCSlTlfltt IS AT 
OhE CJlflNEFL CF A TUBEh TEA PAESECS Q^ ft SIDE- THE BA5E5 
ME AT THE CQCKEftS ^HflVN EELOVt t^ARTiEU At S^ C, AHU D Ifl 
TIE BfilER IH itHICH tUU t^USI ^ISIT T«E*I- 

Z 






/I 

f I 

/ X 

/ : 

— *B : 

1 V 



: / 
I / 

; f 

Ai/ 



I 

f I 

i / 



t / 

— * 



fDfr T&UR SUBHfftCE (flOJO TD BELiyEfl THE HE&SftCE, TDJ 
HUST PM5 *JJTK[li Q*IE f^ilRSEC Of EACH STfrRflftStn iOUR 
PRi?FtfLSIDa BT^rth IS ftHIATS 0*fr GI^INS TOU A C0N5tAl»T 
flCLELEKATIUN UF 0,2 fARSECS FtR iTARBfilE PER STAIH"flTE^ 
TffU UU SilLT Cflfltta THt aJlltHTIiIlOU OF "^aUR BJ^IP, ID 
UERECT VOI^R THflUST AND HEtELERflT ]flK. TOU ^PECIFV rDUfi 
SHIf'? flTTlTuHE *t THE ilil&LE TSlE Tj^ (THE CLQCkUIBE fl*IGLE 
in THE X-f K*»ff STARTIHG ftT TH£ ;c-A13S5 ftND THE AN6U 
PBI HHE fiiifiU (IF ]|fEllUAlSflh ftEflVE THE ^"T PLfiHEk 
mil IlfFUT hE(J i^^GLES £ACh STAHDATE^ 



ELAFSEff 


PUS IT IDS 


CaORDI NATES L 


OftlEHTflTieN 


TIHE" 


t 


T 


I 


TriETA , F& 


* 





C 


B 


^ Oifl 


1 


.1 





B 


T &^0 


1 


.4 


D 





^ Or^ 


3 


H^ 


Q 





^ 0,0 


4 


t.( 


Q 


d 


* OhO 


3 


2.5 


D 





? 0,0 


J 


3hA 


» 





? DpO 


J 


4.? 





* 


■? l0flpC^ 


B 


£.= 


i 





7 IBO^O 


f 


7*a 


t 


? 


T IBOpO 


10 


S^2 








1 IBOpO 


fl 


a-1 


D 





? 160,0 


12 


?.4 


« 







HESSftK 


^ELlLiElrED 


Td £A5E 1 


1 




AT TIJtE 


i?.:e 






^ ItOiU 


U 


?.7 


H 


« 


» 1B0,0 


14 


f.B 


13 


fl 


r 50 ^?D 


19 


T^B 





.1 


• Wt» 


a 


?.B 





.4 


* OhTiJ 


}? 


?*B 


a 


,1 


^ ?0,45 


IB 


T.I 


.071 


1-S7I 


^ POtO 


1» 


?*B 


.112 


2.312 


■r ?C^,0 


ED 


?*B 


► i'Sfl 


J. 034 


^ 90^270 


ri 


f.B 


1.2?5 


J,4?5 


■* ?0h270 


12 


7.C 


a.aii 


4.l3fr 


7 ?0,J7e 


23 


r^ff 


2.3?S 


4-378 


* 90p0 


24 


».fl 


3. flip 


*.51? 


^ 9P,1| 


Zi 


?.5 


y.s6i 


J.d^l 


^ 90.1] 


24 


?.B 


i.?02 


4.eo2 


» 270 |<i 


?7 


?.a 


5.944 


^.944 


7 270,0 


ii 


9,9 


6,?ei 


^.065 


* 27(fpO 


J? 


f.S 


^,42i 


i.22i 


* :?OpO 


AD 


9,1 


7.SAS 


5.3Aa 


T 270,0 


31 


f,l 


Q.109 


^,109 


' J70p0 


J? 


T.B 


e,i3i 


5hJ5i 


^ 9O^90 


J3 


?.a 


B.0T2 


5.e?2 


^ flj,?0 


34 


?.fl 


8.034 


l,J13 


^ tOf270 


35 


T.ff 


?.9?5 


d.775 


T Wp27& 


3d 


ff-fl 


?.9lii 


7.016 


T fOp27D 


3? 


?*? 


i^-flsa 


7.CI5B 


T Wp A.V90 


3« 


?.ff 


7.7?? 


7, ^^9 


> 9D^?0 


39 


f.B 


7,741 


7.241 


^ 90p?0 


<0 


9.B 


7. £87 


7.782 


T 90^?0 


41 


9.B 


7.J23 


B.423 


? 90+270 


42 


f.B 


7.5i5 


9.^65 


? 90,27JJ 


O 


?.e 


7.306 


t-MO 


T 90^270 


44 


f.B 


7.440 


?.?^B 


? 90, 2 JO 


49 


9,8 


7.jaQ 


?.7fl9 


^ 90,0 


4a 


»,e 


7.431 


¥.^:il 


-r ?at*0 


47 


t.a 


7.3T: 


9-772 


■f 90p270 


4e 


t.8 


7.?13 


9.aiJ 


^ 90,270 


A? 


f-fl 


7.855 


?.455 


^ 90pfl 


Sfl 


f,B 


^^t}96 


fl.39i 


^ 90p?0 


Si 


f.B 


e.43e 


t,2Ja 


^ 90p0 


52 


1.B 


e.s7¥ 


r.i:^? 


T 90pfr0 


S3 


?.Q 


9-421 


?.22 




ffESJABE 


BELIVERfl 


1 TO ffflSE fl 


? 




AT TIHE 


53.74 






' 9Cl,270 


34 


V.0 


9,Ti2 


?.?t2 


f 90»n 


sa 


f.e 


10.4i;3 


P-MJ 


? 223^0 


H 


f-?a9 


11.274 


f-14S 


■7 45,0 



94 



i7 


*.455 


T1,?45 


9.0S& 


? 270,0 




SB 


*,*5? 


12,58^ 


?.a2B 


T 2?OpO 




3? 


?.A9f 


13,023 


0^969 


T ?70p9O 




i^ 


?s4V 


13.36? 


?,D5 


^ 270 p 90 




i} 


?.45? 


1J-71 


7,252 


? 270^2^0 




i2 


?.i5f 


M.<}72 


^.493 


? 270,270 




A3 


9,i5? 


n.3?3 


T.:li5 


T 27Qt^70 




hA 


?.65B 


14.735 


9.376 


T 270^90 




45 


?,65Q 


15*0^-i 


?-2ie 


? 370p0 




^^ 


?.i5a 


1S.31S 


9J59 


T 27itO 




I? 


?.U1 


1^.36 


9.1 


■? 270 rO 




AB 


P,t? 


15.202 


9.fl42 


T 245pO 




Af 


7,640 


l*,ffH 


fi-?93 


? 250p0 




70 


?.571 


H,J2t 


a.?25 


' 270p0 




?( 


?H^a^ 


15.5?5 


3.9^6 


-7 ^15,0 




?i 


P.?*^ 


]2.i7? 


a. 307 


T 2i0ta 




?3 


9.0J 


11.571 


B.749 


* 257p0 




74 


a*;&7 


I0*?ifl 


B,6^ 


? 243,90 




J5 


fl.lA 


B.Bi? 


a. 73;] 


^ 230,0 




74 


0J 


7h372 


B.973 


■? ■3l:a^a 




f? 


7.5fl1 


5.3fl5 


?.015 


* 150pO 




7B 


A. ^2 


4,23^ 


?*E3i 


T ?clpC^ 




7^ 


fi,fr?i 


2-91^ 


■9.297 


■7 9flpO 




SD 


5.31 


1-5?1 


9h43^ 


-? TU^O 




fli 


4,5!^ 


.36V 


9.5B 


T 90tO 




62 


j*7ie 


-.25; 


T,722 


■? 90.0,0 




9J 


2.9i: 


-.373 


?-3i3 


^ 45,0 




sq 


2-23ft 


-3.324 


10.00? 


^ 45p0 




13 


1.^43 


-1.633 


tO.Hfr 


? 45,0 




Bti 


1.S3 


-i.gi>i 


10,287 


^ 45>0 




67 


.?3? 


-1.327 


10.429 


? 45,0 




QQ 


,7^ 


-t,7Ej 


10.57 


■7 45 pO 




Sf 


.781 


-1.45i 


1J.7I2 


^ ATfpO 




?0 


-?15 


-1,05B 


10.993 


^ 45^0 




?1 


Kie? 


-,51? 


10- W4 


? 200 p 270 




?2 


K535 


.d9l 


n.0J6 


* 130,270 




t3 


l.SS 


.;i>i 


10.ff77 


■7 130^0 




!4 


2.12fr 


K31t 


10.61? 


■^ 1B0,0 




?5 


2.l?1 


K^2( 


10,34 


! 225p0 




T4 


2.044 


2.4i 


10.fO2 


? 260,0 




V 


1.B32 


2.^3 


?.B^3 


■7 270tO 




?ff 


1.A02 


3,00:^ 


9.5fl4 


^ 27&pO 




9? 

3 Q j1 


tnsri 


2.5-*4 


?.32i 


? 245 




10D 


i.a^a 


2-ni4 


?-0A? 


i 2dO,90 




ret 


.7B2 


S.445 


9,709 


T 270,95 




1(12 


,1^? 


2.1J^ 


S.95 


^ 235^0 




lUi 


.173 


1,729 


9.fl?2 


■^ 295 fCl 




iin 


-.0*3 


1,13S 


9.2J3 


■? 300p0 




lOfi 


-.172 


.3d5 


9,374 






MESSAGE DCLliltREO TD BA5E 


1^ 3 






AT TIHE 1^5. 4S 






' 9i)pO 




Ifl* 


-.25S 


--393 


?.516 


? 75 tO 




1l>^ 


-.J03 


--953 


7.i57 


? 80^0 




10^ 


-.m 


-I.JTfl 


9.799 


* BOpO 




10? 


-.2? 


-^1 .4E3 


9*?4 


'7 flOpO 




110 


'h3^ 


-1**5» 


lO.DBT 


f 90p0 




111 


-.15J 


-1,233 


io,:?3 


^ 90,0 




nz 


-076 


-^BC}£ 


10.3^4 


* 90 pO 




113 


1E-Q3 


-,179 


SO.^Oi 


-7 90 pO 




1U 


.07B 


s^4B 


10.fi4J 


^ 105^0 




ns 


J29 


1,fi7E 


10.739 


^ 1i>3p27a 




11* 


.134 


2.791 


lC^.a3 


? 101,270 




TIT 


.17? 


3.!1| 


(O.i^'l 


^ 99^*1 




11D 


.IB? 


S.1J 


10.113 


■7 261 fO 




119 


.1i7 


6*I4B 


10,13^ 


^ 270 p90 




120 


.13 


.V46B 


9.??6 


^ 270 pO 




121 


.0?? 


8.400 


?.93? 


T 260p90 




122 


.035 


9.4Da 


9,979 






HE5Sftfl£ OEllUEfiEtt Ttt B«E « ^ 






rtl TIflE l!?-5a 






GOOD JUB. DO "VOU UAtil TO 


T"l:\ Ttt IMPROVE 


rOUfl TIMET 


NO THAMK 


tOJ" 




Dl. 













1_I3T 

10 

11 

12 

13 

2tt 

3l> 

40 

100 

110 

120 

130 

140 

ISO 

IfiO 



Pfi THT TAB ( 24 ? I "flflNU EytfiS^' 

FKllir Tflfll20^;-CftEflTJ'J£ COWUTJPtf- 

PAINT TftB[1S5;-»IDRMSTaUHp «EU JEflSEY" 

PftllfTifRINTcPRlilT 

FRI«T -IID TOIT dEEtt Ifl^rftUCTIONa^f 

IHP1IT r% 

IF LEFT*CX»,T]i-H'* THEN 5O0 

FRIHT 

^QB rt«E THf PIL&T OF THE ENTERPfilSE-'a SfflH ShtUTTLE.* 
Tfllf ftU5T ffELiyER A HESSAQt TD EACH OF FOBR STARftASEB,- 
TH THE LEftST tOTftL TIHE, TOUft INITIftL RflSITIttN 13 flT"" 



flllT 

PfilHT 

PfrlHT 

FRIHT 

FKIHT 



170 
IBO 

1?0 

:*o 

210 
iVt 

230 
J^O 
25fl 
260 
2?0 
275 

2SB 

290 
3»0 
310 

3?fl 

340 

310 
360 
370 

33D 
J 90 



110 

42 1> 

430 

4*0 

450 

4*0 

470 

500 

5*5 

SIO 

520 

510 

54D 

IK 

560 

5?0 

5 BO 

590 

640 

^10 

630 

^40 

690 

660 

6?W 

6B0 

700 

7tO 

720 

730 

131|l> 

Bl)5 

Q06 

BIO 

fi2^^ 

830 

fl40 

3tO 

G60 

a?o 



fRIHT ■ 

PRINT ' 

Ffi[HT ' 

PRIHT ' 

fRINT ^ 

fRINi ' 

PPLNT ' 

PfllHT ■ 

PRIHT ' 

PRIRT ■ 

PfilNT 

PR[*<1 

PRIRT 

PRINT 

FRINT 

PSLIMT 

PSJHT 

PRIRT 

PRINT 

FfilHT 

PfrlHI 

PftEffT 

PRIBT 

PRINT 

PBINt 

FRIHT 
PRINT 
Ffl(NT 
PRIKT 

pff]+*r 

PRINT 
PKINT 






/I* 



STflRT» J* 



: / 






- ^1 



"FBR rEHlR 5UBSPACE ftADlQ ID UEH^R THE HESSflGEp TOU^^ 
"MUST PASS SJlTHEd BNE FftRSEC Of EflCH 5TftRSfl3E* TOUR" 
■PROPULSION STSTEPI 15 ALUftlS OH, G19IN6 ^flU fl CONaTftHT'^ 
"ACCFLERATmN Of 0.2 PftRBECS PER STAftDriTE PER STARIMTe." 
"rOU Cftd GHLT CONTROL THf ORlEHrfiTlDH UF TOUR SIIIPt TO' 
"DIRECT TDUfi THRUST flRP ACCELERATION. VQB SPEC If T ^OUR' 
-gttlP'S flTllTUDE Bf THt fl^GLE TII£T* HUE CLOC+IUIBE fl«QU 
'IN THE X-y PLA*tE STflffTING ftT TJlE K-AK1S^ fl«D THE fllHJlE" 
-f5L 17H£ ANGLE Of IHCLlttrtTtOH ftBOUE THE X-t PUfff ] -" 
■■^au INPlfT N£U ANBLE3 £*^:H STfliTlflTEH'' 



PHINT 

Ltl F^=iJ4159/]ffO 

LET J*l 

[lEtl T{4^3]pCa) 

Ftlfl ?L^1 TO 4 

FOR Tnl Tfl 3 
REflli T\tff) 

NEXT 1 

«ej:t X 

BfiT<!| I OpO^OtlOhlfl-tOjOpOp 10^0, 10.10 
LET A=.2 
LET XI-0 
LET Tl"0 



LET 

LET 

LET 

LET 

LET 

LEI 

LET 

PAIMI 

PR til I 

PRIRl 

FlTllfT 

PRINT 

PRINT 

PRIRT 

FOR K 



21=0 
Vt="0 
V2'0 

T0=0 

J11=1E-03 

B2=lE-03 

" ELAPSE 

TAR^3B}; 

'^TIHE 

TAEi33^: 



POSITION CD0RDIRAT£3:'J 
Off I EN TAT ION" 

X Y Z"; 

mTfl r Fsr- 

T0;TA?Cfl^;INT^00O*II-^-5^/1OO0tlAP^fi>; 
lrtTC100D*TL*,5f/lOOO;TAB[28]:lrtT<1QOO*Zl4*5J/IOOO; 

rAHC3B]l 

TO 1 STEP .02 



C<ll=S + K*UH-l./2*K*t;<C05(B2:tfJ+i:OSCBl*P) 

C 1 2 ^ -T tr *y 2**1 /2 ^^^ t tt+cas ^ B2+p : *5 IHi &1 *P> 

CtJ»"7***V3*fl/2*Rfr*SINiB2*P) 

1-0 

L'1 TO 3 

S = IJ4[TfJtt3-Ca^5=*tT(JrLJ-C<B.fS 



¥00 

fl& 

920 
930 

9^0 
950 
940 

9?0 



'□ME CORNER 

■ARE AT THE CORNERS 

-THE ORUEft IN UHICM 



OF A COBEp TEH PARSECS Off ft SIDE 
SNQUN BELOVp HARKED Ap B 
run ItUST UL3LI JHEH^" 



THE J ABES- 

G, ANH D ir 



9S3 

990 

IHO 

T040 

H^O 

ID60 

1070 

1060 

1090 

1100 

1110 

1120 

1130 

1140 

Gl. 



LET 

LET 

LET 

LET 

FOR 
LET 

IfEKl 1. 

IF SflR^R3?l OmO 950 

PRIRTiPRINT "fltSgAljE KLIV^ED TO BASE t*;j 

PRL^r "AT T[t1E";T0ilL;TA9I^B^; 

IF J*4 aOTO 1100 

LET J=J+1 

OQTO 960 
NEO K 
LET x=:ti 
LET t^tl 
LET E=Z1 
LET T0-T<H-1 
IRPUr BU9J 



LET j:i=X*Vl4A/;fC^3aCB2*P?tCK<?1+P> 

LET TT■^*02^-A/2*CQ3CB2il^}^i^iNl|:1*P^ 

LET ;i=Z+13tA/'2*aiHtR2*P> 

LET iJ1=V1*fl*CDS[B?»*5*C0?CB1*F> 

LET "J2=VJ*A*CQ3CB2*F3h5iN^&l*P^ 

LET V3=V3tA*SH*tB2*P> 

BOlQ 300 

PRIRT "BBOH JOB- DO tOU VAf^T TO" 

PtlRT "TRt TO IHPBDVE TOUR Tl^F^; 

1 HP III tt 

IF LErTi(K*^r)=-T- "THEH 500 

ENB 
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Nastermind 



The orifllnal inveniion of Mastermind is credited to an 
amaieur maihemBticiaa Mordechai Meirovich, who fi<si 
displavfid iT at ihe 1B71 MurenbuEg Toy Fair.* flights to the 
game were bouehi bv Invicta who had moderate success 
with (he game far Th years jntil the Christmas season of 
1 97B when it was the most popular ftackaeed game. Satoa 
surpassed even the old standby, Monopolv. 

In its most basic form. Mastermind consists of a plastic 
game boafd. a dozen or so pegs which can be grouped into 
six basic colors, and two groups of black and white key pegs 
{soTrretimes called "inference pegs ".) The game board 
resembles the figure below. 



key-peg Slots 







* It 

t » 



j(jr 

X' 



hidden code 



o o o o 



o o o o 



o o o o 



o oo o 



X 



-.jo o o o I 



ictive player's guesses 
{total of 10 frames) 



The game is played by two people, whom wo shall 
designate as the "active" player and the "passive" player. 
The first step before play actually commences is to have the 
passive player (In OUT case, the computer] chflose a total of 

four colored pegs at random from any of the six basic color 
groups (duplicate colors allowed, of course.} He then 
conceals these colors from the active player by placing the 
four pegs in the "hidden code'portionof the game board. It 
is now up to the active player to determine, inter moves or 
less, the exact color and location of each of the four pegs 
comprising the hidden code. 

To aid the active player Jn determining the hidden code, 
the passive piayermualawardthe active player a number of 
key pegs (inference pegs) aftereach guess, according to the 

following scheme: for ea^h peg in the active player's 
current guess which corresponds exactly [m color and posi- 



■Fd. Mora— 

To anvo"e iBnulPflrmill* childranS oameBr ii is dCviou^ inai MaErHrrriirKiiB 
Simplv ^ soimnerckal adaptallart (usinfl Mlora ralher I'lUn rL-r^bBTi,| ul Ihg 

gams Bulls and CqaS tUts game, miich more popular in England ihamhe 
J S isnal, TOmvfcniJwlHdgB, COmnkarciallypaH*aged — DHA 



i(on) to a peg in The hidden code, the passive person places 
one i»/acA peg In the key-peg aqua re adjacent to the passive 

player'scurrent guess frame. Placing ofthe key pegs within 
the square is arbitrary since the rRlative position of the key 
peg carries no meaning. Ciearky, when four black pegs are 
obtained, the hidden code is broken. 

Secondly, the passive player must place one wftite key 
peg in the current key-peg square for e»ch peg in the active 
player's current guess which matches (in colorn but not 
positien) a peg in the hidden code. Keepm mind that once a 
color peg in the player's current guess has been awarded a 
key peg, its function m determining the remaining number 
o( key pegs to award for the current guess is finished. For 
eJtample. suppose the hidden code were; 

fl B Y G 

corre^jonding to red. blue, yellow, green, and the active 
player's current guess were: 

G 8 B P 

corresponding to green, blue, blue and purple. 

The passive player sfwuld subsequently award one black 
arKJ one white key peg for the following leasons: the blue 
colof peg in position 2 of the current guess matches exact^^r 
In color and position with the hidden code. Secondly, the 
green color peg in position 1 of the current guess matches 
the color of the peg in position 4 of the hidden code Sut 
since the /ocawort of the green peg is not exact,only a white 
peg is awarded. The blue and purple pegs in positions 3 and 
4, respectively, ofthe current guess do not match either th* 

color or position o* the remaining pegs in the hidcSen code 
{positions T and 3) arKl hence, no other key pegs are 

awarded. 

\ he game proceeds in this manner uniil the hidden code i^. 
broken or all len frames have been filled. As noted earlier, 
the computer wiH play the passive player in our computer 
version, generating a hidden code and awarding the black 
and white key pegs sft^r each guess. 

The program offers the user two oplions, QUIT and 
BOARD, which may be entered at any time after the first 
move. QUIT instructsthE program that you are fed up with 

playing Mastermind fw the time being and wish to 
terminate the session, BOARD instructs The program to 
printout a summary of the moves prior to the time that the 
BOARD command was issued, incinding ihe gun^sses and 
key pegs awardedfor each frame. Some players find that an 
arrangement of frames such as thai provided by BOARD i& 
easier lo visualize and subsequently analyze. Beginnara 
will find il most useful. 

The program and this description were written by David 
G. Siruble of the University of Dayton II firsl appeared m 
Cfsative CompulJng. Mar/Apr 1 976. 
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EtUH 



i1AST£RP*LM5 
CtEflTIVIi IJOMPUTIHC 



THE BftHE HF HAST£R*I[NB 
CIH_QF[ CDEfE^: 



P-RED D^OrtANCE T = "rELLaU 

G=GREE*1 B=BLUE P^PLIfLPLE 



HD^E ilJHEE*! 1 "^ flftl^fi 

l*J-AtK PE&S 

1 UNITE PEGS 



M^i. ttJABEH 2 "^ aOBB 
C UHlTt PEGS 

ttllLif HIIHEEK 3 T TTTP 

3 BLACIt FE6S 

4 UHITE PEltS 

flfll^E NUHBER ^ r "fVpR 
2 BLACK PEQ!^ 

5 UhllE PEES 

HflL^E NUrtHER 5 ^ GTPF 
2 SULK PEG& 
: U}IITE PECB 

MOVE HfeJHBEK 6 * IGPP 

"VHU UJfliL 

UiNI Ifl fliV rtSfilH"? TE5 

MflVfi KEWIBER 1 ^ RROO 
1} BLfii:K PfG5 
■} UfilTE PED5 

HOVE fttJflBER J ' bGVT 
1 BLIithI PtGS 
t UHITE PEGg 

MOVE HUflfllifl -3 ^ BBP? 

D WHITE KEfiS 

HOVE #lffl£EG fl -^ aSGT 

IJAMT ID Pl,A"V flGrtlN-^ riO 

l>t 



LIST 

10 PRTWT TAB:2^>V'HASUfihIND- 

an fRm Tfl»<:oj;"j:B£ATiv£ cwputihg" 

35 PKIBT Tft5^^a^;-MOR^:[3T□UNJ ClEU JtRSEl" 

« P111NT:PI?]NT;PR|HT 

lOD PRIKT -THE GAME ITF flfl^TERrtlHff" 

PRINT 

PRINT "CflLDfl tClD«:" 

fftiilY ■■ fi=REII IJilSflfiHGE 

fflUy * E=i;PEEii B"BLJE 

PHflT 

fQP N-l TO ^ 

Cctl^ = INTCi*PHLlin+-15 

NtlfT K 

FftR H=1 TO ^ 

KUtNJ 

BQSUB 73D 

^O H 

Fl]« S1=t TD < 

P4^pi+t[i^c[:cxin 

NEIT II 

FDR P-1 Ta ID 

PRINT 

peiNr "Mfl^'e nljhbek'^jP! 
wpfeir fit 

IF E*= ■BOflRG" THEN »10 
IF H^-^fiUIT" TltE^ Ai(t 



139 
140 
UCI 
1» 

1?IJ 
II 
1?0 
21] 
210 

^?a 

33fl 

2^0 
2iC 
370 

3?5 
27? 
2Sfl 
ZTC 
3U0 
3tO 
32 Q 
3J1> 



V^YELLQU" 
P=:PURPLE"' 



3^0 
350 
SiQ 

3?0 
3HI? 
^^0 
fl#0 
410 
42<t 
43U 
4^0 
^50 

49^ 
4?i} 
^Ci} 
510 
520 
52J 
SIS 
5JD 
541} 
^5i> 
5dO 
570 
Sfifi 

^Dl} 
iHJ 
dD5 
AtO 

620 
6i1i 
6^^ 
65i> 
4dl} 
d70 

700 
710 
720 
73D 
740 
^SO 
7tO 
7?(1 
7 BO 
^90 

3^0 
ttJO 



E*{P!=ljt 

ailSUB 521J 

If P=^ THS« lOlU 

BDGiJE 6^0 

^filNT fl;" BLACK rt6S" 

r^f ?=l 

PRINT it;" UNITE PEOH" 

i[pj»y 

ilEST f 

PRINT ^'SDftR^, TQ*] LttSE" 

PRINT "THE tOaarttT DflCE UflSt-jPl 

PS[NT "UAHT TO FLAT flGrtlii"; 



IHPUT fl* 

IF flt-"VE3" 

PRI«I 

END 

REP CDHPUTE 

Ffl» RL=1 TO 



THER i?a 



PFflB 



10 



1 



THEN ^70 



4 

Qiall=jlSCtMlII*CB1tJ^lJ>? 
KIT Kt 

FDR K"l 

IF GfKJ 

E=B*1 

N£KT K 

RETIJI^N 

Ptn EOHPUTE UNITE PEDS 

FOR ):i=1 TD A 

RUli^A?CCHIEHCP*,KVI>) 

NEX^ X] 

||<0 

FDR 1=1 

FOR J=1 

IP D(I» 

RU?-5 
GflTD 6?D 
HfitI J 
MEKT I 

ll=U-t 

RETURfl 

REN TRflf^SE-ftTE 



TO 
Til 



RU^ TMEJf 



^b 



ttlLOR C0B15 TO NUHERICE 



£F ( O I THE« 7JD 

X=8? 

RETUHN 

IF 1 <> 2 THI-H J90 

RETURN 

IF K O i THEP KQ 

I -=50 

R£TURN 

IF X O 4 EHEfl DUO 

*■?? 
B^O HETURH 

G50 IF X O 5 THEFf 380 
840 ^i?! 
370 Rflk^V 
810 E-46 
Nfl^ ftETuFlH 

^Dl> FcEn PRINT SOdfcm SUMART 
?tO tf*P-l 
910 PSIHT "GDESS 

?30 FRI«I " 

9t1] FDR 1^1 TD ■-■ 

v^u PRIKT Bia^ra^Z(i> 

??0 MEIT I 

1DD0 DUTD 274 

1111} fRI«T "im UlNlt" 

1^20 £DTD 45D 

???9 tKD 



?LHCK&', 'UNITED' 
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Nasterbagels 



Tfiis is 3. faacfnafing, general- 
purpose, cfedEiclJ^e logic game. II rolls 
Bagels. Mastermind, bulls and cows, ct 
cetera, inio one general deductive 
Icgic game. It you want to play Bagels, 
set the inputs to N.3.9 (N i£ the number 
of games you wish to play]. It you want 
to pUy mastermind, set the Inputs to 
N,4,6- Of course, many of the games 
that It plays are entirely new altogether 
such as H^i'' or N.5^5. 

To make if info a really general- 
purpose game, you might want to put in 
a modificatfon in the digit selection 
routine (statements 300-320} with a 



parameter that either allows or dis- 
allows duplicate digits. As it is right 
now, the game does allow duplicate 
dfgits so that for example, it coufd 
select a three digit number such as 223 
or even 444. Another change you might 
want to add Is rn statement 750, it sets 
fhe maximum allowable trials for 
getting the answer. You may find mat it 
is not grving you enough tries and you 
might want to increase the value of I, 
Masterbagels was created by H.R. 
Hamilton and originally appeared in 
CroaUire Computing. Jan/Feb 1977. 



PUH HABTEPliaaEll 

crUTivE GonniTiHt 
notrisrauii, ma jevki 

TEHGIf 1ES 

n^ THES 15 A LBG1C OAhE PESlOKEe TO TEST TDOR KIUCTIUF 
AlELirr. 1 BILL CHOQSf « PANDOn HtlKltfl ARU rOU lIOLATt-lT. 

una rtaHPTED, itnif t valid hifiiei* fiiiri i uiu. T^Efl tESPOCi 

UlTH THE t OF IIBIU TH*T Ml fffflNT »l IH THE BIWT PDflltieH 
ABB IKE I tISHT BUT I* IHE UCDHG POBITIEM. IF I THlHH TOU 
AVE POPEtESSir LDST. I VILL JUl TOJ THE AITSUER UB IE 
UILL BD DB TO THE HEIIT KJBlEB. TO lEtiP lOUfT EUTPIES 
FBIEB Ik a, TO SUIT » * BUflBEIt EBTfB 1, Ul IQ ITV EMTEII 1 



i miEMOE FV? 1 KuntEirs 



H«i nnt i'»fi'i»it 

EdEBST 1} 

. 1 
0BE441 IT 

C . 
OIEBS? 2* 

3 TBIES. 
Olitiil 24 

, T 
miCSSt 32 

1 P u 
QlKSS* 22 

^ ■ 
eSESSf 12 

4 TftlE3, J.S dVCRAQE FM 2 
PBB lOAIVT TE9 



I llA]TS(2-»t, ABS MI MUEfl-IJT 7,3.4 



tfWBEffS 



Hflu BAqr i-S4i-t4ei, i 

eilEBST 1122 

1 . 1 
O0E5ST 1314 

2 . 
BIftSSt 341* 

eiEsr i2ta 

I - 1 

0UEES1 213* 
' . 1 

oilfBar 



»191TBl3-t], Wli nu UAI-I|EI2'T]* 1,4.4 



LISi 

Z flllBT TABC23}:-|liialEltBAeELa- 

6 PEiBT ri(il2(r;-CBEilT1irE COMMIT ME - 

J PEEBT TllBClSi;-ltO(rR]3TOUN, NEU JEtSEf 

3t IIPUT *TEacii';Ei 

TF LEfHt9ljrt--IC THE" UO 



I ■ I 
2 , * 

<> r 3 

I r I 

I . 1 

BBE^S* 

euFss* 
I . ^ 

QUES3* 

ambueh 



■ 1122 

- 1234 

- sm 

- 3134 

22ii 

2335 
1 



IE A324 
m IVIES, 1» AVERAOE 

RUN HOnir M3 
01 



if 
7D 

9D 
ISO 



PGIHT 
PGIHT 
PWBT 
PfllBT 
PBlllT 
f IT INI 
PPTBI 
PHHT 
E-a 
POINT 
PEIBT 



' HI, IBIS IS A IQBJC OME BESIflfFn TO TEST TOUB DEDUCIIVE- 

-ABILin. 1 VILL CHOOSE A HANtDl -HHBEP 4N[I TOU ISOLAIE H.' 
-tlHCl' PRtlNPTED, EKTEFT A V4LID IrUeiffEH, AHD 1 UILL IHEB JfE^FIfrD- 
■JITH lilt I if DIDITS THAT AEf FTQIII AND IH THE RISHI P03IIIDH 

->NFi THE I R[GNT BUI IN THf llVUBb POSITIDN- ]F | THIMK 100" 
'PltE MQPElESSLT LOSI, 3 URL TELL lOTl THE ANSUER ANH OE- 



■UILL 6\i ON 10 m HEfT NVHBER. TO BECflP IDUR EfflRTES" 
■ENriR A 0. TO DUn DN 4 KUNtEtl EITIEIT I, HHQ ID SCQP ErilEH 3" 



■TIDV MNl' i'Sn-IODF, t DIBirs l3-&>, MD NflU 



IBf 

Tt* 

2ae 

210 
33C 

29e 

240 
310 
3AC 
2?& 
2B9 
3t» 
319 
31 » 
33D 
339 
140 

3ae 

3*0 
330 
310 
3fO 
40» 
41D 
4» 
4J0 
440 
4^0 
440 
470 
4«B 
4t9 
3»D 
510 
S20 

no 

540 
530 
340 
970 
5BCI 
5fO 
iOO 
410 
430 
d30 
440 
450 
440 
4^0 

aio 

4 TO 

:>no 

710 
7!0 
730 
7*0 

7 SO 
741! 

771} 
710 
7f: 



RE-EHIEft BDN PARBHETENS- 



'■H(J,]I 



eio 

910 

eta 

fllO 
040 
B7D 



FOB I flUhBE^a 



efo 

900 
OB 



ll#DT J, 4,1 

IF 4<.8 IHCB 220 

IF 4>4 TBEH 270 

IF B<2 TNEV 220 

IF KIO IHEB 340 

PBTHT -ILLEOAL ROHSE, 

eOTO UO 

IF J a 00 THE If 240 

J-IOO 

FQI 1-0 T6 JtfltB 

I'BITBIT] 

■Ef f ) 

FDR Vil ID J 

FDt t-Q ID 4 

T'lE?iJllT(fiHBU>'BTl) 

■EICI 1 

FOR I-l 10 *tB-T 

FHT It>l 10 A 

FClJiO 

BEiri I 

Fi-e 

F2-0 

livciT "BDEss-;v 

IF VO a INE" 490 
For (■! TO 1-1 
pfllifi HU,it-t'ml,2i' 
BE(i j: 

O0TO 3f 9 

IF V'l llfEN 759 

If V-J THEN 920 

TI-0 

rW I'l TO A 

HOlt'IftHlT'lTOTB-DH 

ii-Ti-Niici-M9-fA ;c»'<igoifiA-<a*iff-^»--.5i 

IF BKKI TNEB 530 

IF nilKB^I THEN 550 
PEINT -IliB BJIIEEII IN"* 

soTQ na 

IF nii}OTCxi TnEir aat 

F<H)-I 

FI-FUl 
BEll 1 

If Ftm iJtEir 810 

FOS T'l in 4 

]r KD-niVf IHEB 4M 

FOR IC*1 TO A 

If H[T>OT4ri TNEH 4^0 

If tiJt'l IH&B 480 

F{T>-1 

f2-F2.1 

0910 4T0 

ITEJT J 

fitil 1 

FRIHI FI'p'F? 

HC|,IJiFl 

Hl],2F-F2 

HLJ,{>>tf 

HEJir I 

l/vO 

FOR K-1 10 4 

f-vi <.%>•* 10- ifi-y.it 

llEXT 1 

PfINT "ANSlfER H-V 

5«fitl 

PUNT I-IHESh-J'H-AUERABE foh'ii-hunher?- 

■ ■INlCRirD4lt]-[] 

'r-TNTfHCT,!)^l524M'FflfDM)) 

FOR fi TO HI 

l-RNDII) 

NETT X 

HE HI H 

l-PUT -PBN •eaiH-!5» 

IF LEF:»f3l,TJ'-T- THEN 130 

Ellb 
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Hatpuzzle 



Ready to try something new' A game 
that isn't like STARTRE>< or Slot 
Machine? Then try MATPUZLE and 
enjoy the art of puzzle-making. 

One benefit ot puzzles Is that they 
help develop a pattern of logic in one's 
thinking. In this puzzle you are given 3 
matrix; ot letters, up to 6 K 6, and a 
board with dashes and a number abova 

each of the dashes. 

The matrix represents the letters of 
The words you typed in. each having the 
same length. The number of words and 
the length of the words are both limited 
to six^ sU words each six letters in 
length, but, both values don't have to 
be the same. The letters are then put In 
a matrix and randomly rearranged In 
lines 160-430. 

The dashes on the board form the 
places for each letter of each word to 
be written In after It has been 
deciphered. The number above each 
dash, determined in lines 500-780, is 
the 3 jmot the coordinates of where the 
letter of that dash is located in the 
matrix. The problem in solving the 
puzile is that several coordinates have 
the same sum. 

Since the answers appear above the 
puzzle Itself, rip them off before you 
give IT to afrlend to try. They will havea 
great lime trying to figure out your 
puzzle. Then let them make one foryou 
or set up a relay. The possibilities are 
almost endless. 

The program and description were 
written by Dave Schroeder. 



CFlfflllUE [QJlFUTIPfl 
HOIfHlSrOWBr "EU JEB5ET 

TB1S K 1 rirrzLf-iHiiiia SHit- 

TBl IBftlT LP to ill UDI'BS, [IP Iff SH 
LFTlElta EACH, 4111 liiU. lH LUeiH- 
THE CONPUlEFt UUl SCH^flBlE THEd Him 

niNT rifEJi I" * imr^i-. the fOMPrEfr 

UILL USD PtINI fi J:QI4E^I'0f<51IIIJ KUHBES 
B»(ll. ma II STOPS Ittl! tT MP 6IVE IT 

T| H fXlElTTl- 

hOb Miif LEfrctta in EflCM mfm iHUsi be b«ie>» * 

Tifl ailE t -EllElt UDK» OK EACH LlflE 

T PflRTTf 

T IIUPLE3MVJ! 

1 uma 

T LEHOTP 
* HQTHEFr 



{ TEiMl KtE t — ' 



1 
I 
3 
1 
S 
I 



1 2 

I A 

E E 

I n 

a L 

X t 

1 T 



i L 

il h 

B B 

A n 

P Y » 



1« 



It 
5 

6 



11 



II e 



12 



THE ¥VliBtfi HBOVF EPCII ttHBH 15 THE 5UB Of TUD CD0lflil*fflTE5 OF 

Thf rami ot the batux uhebe the ccn+FfHi letiep foft that 

Sm UILL JVPfEsff. Ill[ PltlBLEJI 1* IH" !« SUM OF SOHE 
CDOFIliH<=TfS HKE Iff 5i*IIE M aEwEFml LtTttM tOULU F]T. tO 

TH noil TO niB unti uoims utffE usee aud solie th^ pu:zle 

— 0D4D LUCK 

DD 10D HAIIT itHOmH fOV* lES 

HBU rt*iir 1IDRB5 Oa rOU UWT (ur TD il' 4 

HDU fnUfl LCTTEB6 III tiCH W»D (ftUST K !«1FI' 5 

TTPE QUE a LETTER UOlfB QV EfiCH LIKE 

T PPIHT 

T BASIC 

1 EOUfiL 

T pojv: 
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I ? 3 fl 5 

I B a C V E 

J I 1 fl N L 

3 1 I 3 B P 

* * T P fl 



1 TEAIt HERf > 



7 
1 



2 
9 

3 
9 



6 



5 



lilt nWKI HBOVE EflCIf DftSU 18 THE SUH Qf TUO CODTTDlUflTEa W 
IHE PBIBT OK IH£ fl*TFfr:i WiEBE IhE CQRHCI LElTfK FOK lHHT 
SPOr Unt SPfEflR. the PMBiCI [S FH*T THE SUA OF SME 

ClOSDlMinES aSi the ^BHE SD ECIEPiIL LEIItPS CUdLIi FiT- M 

TBI itnu lu fiHB JHfli mn^ uebe useb mh solve ivt miiE 

" QOO^r lij[:k 

DO TOU HAIIT 4N011IEB BUK' HO 



Lir 

J PPINT TflB134J"'ltATPiniE'' 

2 pi;]HTiJi&(?:rcffE*n:i;E cdhpotiiio- 

J PflINT TABflBr'HOftRISTOUif, HtU JEBSEf 



4 I 

10 

?c 

JO 
40 

zn 
a« 
?s 
at 

9C 

TOO 

IDS 
110 

lis 

170 
130 

r<4 

ISO 
I4I> 

I?0 
1>0 

1" 

200 
31D 

:is 

771 

275 
2?« 

2?^ 
210 

2<0 
2)0 
240 

270 
3Bn 
2TD 
340 
110 
J70 
3^0 
310 

aa 

J 70 

300 
?9fi 



HlHIlPFIMT 

Bin mt6i,ti<b,f,},zf^,ii.ti'b.£i 

PBINT-THIS IS ft PUZZlE-ftMlWG GftHE." 
PBlNTTDfl IdPUr UP ro SII U!WII5, UP 10 SIX" 
P«lWT-LETItH9 EACHt ANH EHUAL IN LEHQTM,' 
PlfMfr''THE CDflPilTEP tJ[Ll 5tBflPBLE TNfH flUTl" 
PffMtl-PllltfT TMEU IK I* «THIC. THE LflMPUTEB " 

p»mi-iiiLi fliso Pifiii I* coBPrspomiiHe nunBEfl- 

PBINTMflltS, UMEN II STBP5 TESR TI AUB OIVE IF" 

PKLNT-IQ n fBIENB.- 
PBIHI-HOU HAITI MUK DD YdU tHNT 1UP ID 6»-; 
INPUT II 
PBINl'HDtf HflNl IEITEP6 IN EfltH UWtD (WJST BE aHlEl' 

IKPUT L 

pHHT-npE nifP':i;-iETiEii iiiiffB on EflCH ljiie~ 

FDr I>1 IQ u 

IlfPUT AlClh 

FQll X=l IB U 
FOR l-l TQ L 

t»fj,n=pilli»lA»i^),i,i nBiu,r)Miotc«UJ,T,i \ 

NEIT S 

tfECT !( 

PltlHI 

PQfr P>1 TO 29 

PPINT--"J 

NEH P 

Piim TflB(2»>-( TEAR HEffE ]"! 

FBR Pl"1 10 ?7 

PRMfT TABItiJ"-"! 

if Eli Pi 

PRINT 

FDR Z=l TO &|J 

P-r>mRND(l J»U*1) 

D^LHKRNBdJ-'U'U 

e-||fT|RirB1l]1-Hl> 

E=lllT(PflHI»L4l) 



Jt=B1CE,e» 

BIIF,B>"BHB,E) 

BflUpEI^Jt 

NEIT 1 

fRlfl T4B(4i; 

FDR :i-1 TO L 

PRIHT IflBl5)fili" 

niu li 

PBiwr 

Pfi[NT 

fits nii 10 II 



440 
419 
4?0 

430 
440 
4^ 

460 
470 
4E0 
4?0 
IDQ 
519 
510 
S30 

am 

sso 

370 
S30 
S»0 
i«0 

iio 

^70 
6ii 

A40 
A^O 
i&ll 

dBD 
AVO 
JOO 
710 
7?0 
73 1> 
?40 
7)0 
?40 
770 
780 
790 
SDO 
SIO 

szo 

030 
S40 

B50 
Q55 
SdO 
S4I 
07Q 



HIHT !5i" ■; 
FCtt 13=1 rEl 1. 
PRlbT itdljZi'f" 

HEUr Z3 

PJtlJfl 

PRINT 

NEXT Z2 

PBINT 

PRUfT 

PRIM 

FGR P*] TO L 

FOR a>1 TO U 



P 



T*4 

rw R=>1 m y 

FaE 9^1 TD L 

IF T-1 T^Eil ^0 

Tit 

IffilT S 
HEXi It 

HEXT a 
H£XT P 

FOn S=l TD il 
PRlJfT TAltJ) 

FQS H^l TC L 

!F C<Hpft5>? TtiGfl ?00 

fRIHT catH^f "I 

QQTO 7SD 

Pftlill CCXpllJ;- "I 

M£XT n 

FfflKTjPtllfT 

PRIHT TAB{?>; 

FdH fll-l TD L 

PfiiHT- "i" ■; 

MEXT »l 
Pfllttl 

PRIHT-THF NUMBER AFOVf fflCH BflSH IS TWE 5UH Of TUO COWtlH NATES OF 

PfilKT-THt FBlfr! Q^ l^E H*tfi|I UHERE Tfif CflRft£C-f LETTER FQI THAT ^ 

PRlrtT^-EPBT UILL flPPEAR. THE PffDJLlM IS TttAT THE SUA OF" 30Hf ' 

PfH^s^raBS[>;*(i^TEa ABE THt SASIf 3D SEVEHflL LETTERS CDW.D FIT. SQ 

PRIHI"TSr NQU TD FlHfl miAl U^S U£llE USCI AND MLUE THE PUZZLE" 

PUNT^-" fiDOB LUCH" 

PKINT'BD laU mm AHITHFB Bim**^ 

tHPUT T9* 

IF T?»«*'TES' THEN ICO 

EHII 



OK 



naze 



L_b^., 




HUN 



This is actually a Iwo part game. In 
Ihe firsl part, the program genergies a 
maze which you can then try to find 
your way through with pencil and 
paper Each path of the nia£e la three 
characters wide, hence the maximum 
widrh that will print on a standard 
sB^nty-two column width telelype or 
other hard copy printer is 24 for the 
horizontal dimension. A 132-column 
line printer coiild handle up to a hori- 
zontal dimension ot 44. Naturally the 
vertical dimension can be anything 
since Its running the length of the 
paper However, for really large mazes 
your computer system will probably be 
the limiting factor since several 
matrices are dimensioned with the 
horizontal and vertical dimensions of 
the maze. 

In the second part of the program a 
near-sighted mouse is let loose in the 
maze and explores until he finds his 
way through. If you wantto know what 
near-sighted means, run the program 
and ask to see the solution step by step 
as the mouse goes through the maze. If 
you elect not to see each step, you'll 
simply get a total solution for ihe maze 
itself. 

With or without the n^ouse, Ifs a fun 
program and the larger mazes are 
frequently a reaJ challenge to solve. 

This program was conceived and 
written by Richard Schaal. 
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TAB{27?;"HliZE" 

TftB[2(i?;"CREflTI"^E COHPUTIND" 

TilBUfl5r'HBRf!13T0WNt NEU JERBEr 
Pfr[iir:PRINT:FRi*ft 
REfl N0U9E IN ttAZE ■ ^OnrCQ** 3ECTI9ti B> AJTHfrRlF SCHMl FtfCC 
REft OfiJGINftL NAZt PfiffGftrtJl FftOJI N01 BASIC CDHPdIt*' lififtES' 
PRINT "DH rttlj NEEIi l*f5TftU[T]DNS^: INFUt fll 
If lEFTiCA*p1 J*"f" nftH 150 
GDTD 204 
PFelNT:PfllHT:PRIHT -THIB PROGRftN UlLL IJTHULIiTE A WEflP-JJGHTEEr HJIUSE 1 



PRINT "A AA£Eh TOU 
PnlUT "^TI^U HAT RAVE 



gtLECT THE BJPFICUtTT FACTQH - SIZE"" 

A MZ£ flP UNT SIZE PfttllTTED &I TJJE SIZE PF TOUR 



-^■rSTEH. DlhEHSlDNS LESS 
-EACH «*i7E IS EiIFFERlHTt 



fREIfT 

PRINT 

PRINT 

PRINT "UHAT ME fQWK PIftEtfSIDNS 

CLEAR lOU: REN ERA&E ALL ftRRfiTS 

IflPl*T HpV 

fl-IHT[ABs^n>s:u■I^tT[ABa(l:^J 

EF H>=5 AHIi y>»5 iliEH 2?0 

SDTQ 150 

BIN UCKpV^UthpV) 

FRIHTiPSINT 



THAM S AFEE TOO iniVIAL," 

ANB HAS UMU UhE UAV TiHflUOH IT/ 



^HORlZOttlALp 
ANB VAflliilLt 



'JERTICliLV'T 
VALUES 



2T0 a'Oa=o 


3^0 IF SOI" THEl* WO 


iOfl ):=IHT^RHi^^?^rt■^t5 


i^^O IF Z^l THEN 420 


3113 fDR IM TO H 


570 B-l 


3J& IF I = X THEN -150 


5S0 OOTO ^00 




5?0 IF U1R|5-H>^0 THEN fi20 


340 GflTQ 34i? 


■IBO J-INTCRNttCI^^^-^tJ 


330 PRJ(ir ": ■■; 


ilO flfl X ODTQ 12110,12^0, IJ70 


3dCi MEXT I 


6Zfl X = ]hT[R«»lUt-2tTf 


JJfl fRIMT ■:" 


A30 ON X QOTfl 1200p124l> 


3fl0 c = i:U[I,lJ=DBC^*liR=l:S-1 


a40 IF R^H TKER -"^0 


^?0 GOTO 470 


i50 IF ttCfi*1rSJ>0 THEIt 750 


^00 If R<>« TREH 4W 


£^0 IF 5<>y l«EN 700 


qlO IF SOV THttt 44l> 


d?0 If Z=l THEM 710 


421} H = l:S=l 


iSO Q^T 


430 UDTD 4dO 


^TO GOTO I'lO 


4^0 R=l25"S+):GOTfl 44t] 


?00 IF UCRp3+-nM> FHEIf 7J0 


IJO R^R-tl 


710 HiINTfEHHt}*3-+lh 


^^a IF UCRTS7=fl THE*f JUQ 


7?I5 nil X GOTO 1200,1200 J37C 


4?0 IF ft=1 THE*I B30 


710 X-INT(fiNlF[n*2+l? 


A^Q IF lfCR-1jST>CJ THEN S3« 


?40 Oil )! eOTO ISOOpl^BO 


4?fl IF 3"1 THFtt ^40 


750 IF %0^ THEN 7^0 


SDO rF UCSpS-UOO THEN i^l> 


7iO IF Z»l THft^ 820 


51U [F R-H THEN 550 


?H H^l 


m IF U(R-tt^SO0 mEN 5^4 


7ao GOTD eoo 


510 K-[HTCJ!NB[Sh*J+-1? 


7?0 ir UCRpS+n>0 T!IFN B20 


540 DJt X GOTO 1?00^12<Cp1^aO 


3*0 ):=iRT<FrN5cn*2*n 




SIO OJf J^ GDTQ 12O0p.lJ70 



1(ffi 



32{] flDTO }2<\^ 

BJW IF E"1 THEN liHO 

Bi^ IF Uift.S-n>0 THEN [(Hfl 

SJO If a=H THEM ?frQ 

3iO IF U(fi^1pBh>0 tttEH ?6fl 

B^O IF EOV THEN 910 

BBU IF 2^1 T"HtN 9^l> 

aio [l=t 

9eCi QDTD ^JQ 

^Ifl IF M(Rra*Sh>*> TTlErt 9« 

P2D K=IH-f^RlfIlCn*3tl^ 

?3i3 ON S GflTfl ie*QHl2fiOp137D 

?40 X-I«T(»N&MJ*2*1? 

QIC OH It ftBTO UlO^1280 

9i1] IF SO'J THEK 1050 

97l> TF ZM THEN IVJB 

9B0 □=! 

9?C QOTU 1BH5 

IflflO IF U<R,S41>iO THEN t030 

1(11(1 X^MTCFrNDM J*2*1? 

1D2ii Off K 613TB 12^0,1370 

1531) GOTO 12^0 

fO^D IF fi-H THEN (H^ 

11)10 IF ll[Ri-lt5»0 THEN 1 HO 

IHftfl IF ffOU THEN lIDO 

1071) IF Z«l THE« 11313 

iCaO 0=1 

IdfO OOTD 1110 

IIBO IF lf[H,Stl)>0 TJtEN 1130 

iit(i ):=[HT^[^l*sa)*^■t1J 

1I2D AN S itDTO 1280^1370 

1130 SQTQ I2B0 

tHO If SOV THEN 11S0 

1150 IF l^i THEH 400 

1160 H^l 

1(70 BBTO 1190 

1IB0 IF UifljEtDi^D THEfl 400 

1190 DflTQ 1375 

1200 mR-1p5]M;:i:=C*1:y(R-1f&)=2jff=R^t 

12t& If C^HiVtl THEN 1510 

1Z20 S^C 

1230 GOTO <J0 

1740 l*CftpS-n:=i::C=C+-1:L'<fi,5-lJ-l:S=S-l 

M^O EF C»HtW*l THEN 1510 

1260 QiO 

1270 GBTB ^70 

1280 kCfr*)T3?=eiC-^ + 1 

1290 IF V(fftS3-0 THEN U?Q 

13l|fl '-'^R,B):^3 

13tU eOTB 1330 

1320 V[¥!r5raZ 

IJ30 ft=R*1 

13^0 IF C=H*"J + 1 THt+J l^ia 

1350 Q^O 

13A[? flDTD Q3(] 

137& IF a=l THEJJ 1470 

13B0 imrpB*1J=C 

1390 c=cn 

HOO IF ^CRTS^^^ ^HEM 3430 

1*U V{RtS)=J 

HZD CDTQ 14^0 

1430 1(Ifp9)'1 

1440 &'&+1 

H5(i If C»H*Vt| THEN 1510 

1U0 GDIO 470 

1*71) Z=] 

H&O [F yiRjS3=0 THEN 150C 

1*90 yiRpa3i3:ll=[):aDT[l 400 

1500 V[pTSi='='3""0Hf-1i^1^MTO 4i0 

JllD IF ;=1 THF« 1540 

1520 ffTlHT[[:«IM)*HKl:3=V 

1^30 i|(ftp5? = yCllpSk + l 

1540 GflSUR 2320 

1550 PfllKT "DO -VOL) UWJT TffE BaLLfTiaW' f : ItJFUT M 

15fiO IF LEfTHfliplK^-'-T" THEN 2420 

1570 FRINI "RD TOU HftNT TO BEE tfiCH STEP";:iHriJ-f At:Pft[«Tlf«llfT 

TIBO FQff I"l rO ft:[F llUp1^ = 1 TMEJI 3*1:9070 172D 

I5T0 rtEO I 

1A00 REn HQU «E Cfi« OLEAR U ftRRFiT flJ EHTfiT FOTm fS FflUHI. 

IftrO eEH ELEflEHTS IN V ARE EiTHEff flp^2 OR 3 

1^20 tEfl IS CLOSEIi OH THE RIGHT ftNtt riT THE BOTTDH 

1*30 REtt I IS tLDSEfr 0« THE t[fiHT 

U40 REH 2 IS CLJSEB ON THE B0T70H 

liac REH 3 IS OPEN ON THE HidNT AHIi fiT THE BOTTOM 

U60 REN b[rei:tiom5 u[ll he coseo: 

1fr70 REH 1 ; U? 

lieo ftEft 2 i DOOR 

1*10 SEH 4 : RIGHT 

1700 REN S ; LEfT 

1710 REM SCftrf LI ABRflr TDff M19S-BLE M0tfE5 "(ri A1.L ITBECTJQN? 

172l> fOfi l^i TO tJsFOR J=1 TO "J 

1730 UCIpJ>*0 



1740 REH TRV tJP 

1750 [f J = l TREH 1780 

l?iO 17 Vl3^J-n=1 OR VtItJ-l>=3 TIC» H1I,Jh=li[lTJ>+l 

1770 REM rUT DQUN 

1780 IF >"; THEN ISIt 

17*0 IF y(IpJ]-1 OR ^(UJ]=3 THEN UII.J] =1J1I,J>+J 

IflOO REM TRT fl[6flT 

IBIfl IF I=K THE« 1B4II 

1B20 IF uapJ5'2 OR '^(lpJ3=3 THEN J< I p J) =IJ(I ,J3 +"1 

1930 BEtt TRT LEFT 

1940 IF 1^1 THEEt IS60 

IB^Q IF UCI ^J):^2 EM lf[I-1,J)=3 iHElf lid pJ)=V(Tt J^*a 

1S&0 NEXT J 
-IB70 IfEit I 

iaao foft 1=1 to It 

laiO If ^LI,VT = ] OB V[],U*=3 TJIEH U(Z,W):-IK lpOS*2:E=JiQ0T0 1920 

1?00 NEKT 1 

1»I0 fiEtt HftiJE TO GO OaifN FJR5T 

1^20 T°l:J;=3 

1930 i|(Kpn^Ua,T?+4 

H40 REM DHECJ; FOR POSSIBLE niREniDrfS HOlf.,. 

1950 ]f T=V AKO K-£ THEN Pft[MT:SDSUB 22lO;F1?IHTtFRINT iSOTO 2420 

1?60 £0SJ9 2230 

1?70 REH CHECK FOSSTBLE BIHECTIQMS 

t¥GO [F ClICXpT? ftNH 2) O THEN 203ft 

1^90 If <l*CXpT? M& 4J O TWM 20B0 

3000 If ma^vj AHI 3) O O THEH 3t30 

2110 IF (U(X,T] fl« 1] <> THEH 21fflJ 

?*20 GDTD 1*!^0 

2030 If CV(X,T+3)>3> AND lCU[XtTJ flHO U)*l>] THEB 20Jfl 

2fl4t IF U(1:tT*1»3 T«lf 1990 

2D5G ■r = T-+li"J<KpT3 = L'(:(,V?-H:SaTI] 19J0 

2040 V[I.T)=V[XpTt-4;li(X.n-flHXpV5 AND 1 31 =^=T4l =UC X pT f'^IKXpY] fl*ie 14 

?»70 eoTQ n« 

2080 [f fiVC^*UT?J3f ftNB ^[U[Tp'r) AflD tn^U) THEN 2110 

■>W9<\ If Vf):+UTl>3 TJtEH i">01J 

210U (■): + l:V1KpT]*ll(tpTJ44:G0TD 1950 

3tlO lPC^pT^=^J[iJ^-4:ll[J.l)^(llapT? flND 11 J^l-X-H =UCXpTJ = lU^X, ^5 AHA ?I 

2120 &DTD 1950 

2130 IP <0CX-1tT^>3? ANB ^ Clia.T) AHU 71:^0) THEH 2140 

2140 TF V{I-U¥J>3 THEN IHIO 

215P ):-J:-l:tf(X,T?=VtSpT)44lGDTD 1950 

^140 V[^pT^p^CK^^I-4lllU,^=^i'tS,T) AND 7?:X=X-1 =U(X,T]=(tfC3<pT? W<)] 115 

2170 GOTO 1950 

21^0 IF iVCXpT-nJ>35 AND nO^.t^ lilfD 14^=0? TH6N 2210 

21?0 If 1"CX^T-1)>3 THEN I ?B0 

T200 T=l-lTliap'n=i|(X.T5+4:GaT0 19M 

2210 V(IpT)-lJCKpT^-4=^lf^.n = lU^^pT^ AND 14T;t=T-t =W<S,T J-<1I(XJ? AND 13 

2220 OQTD 1950 

2230 IF L£FT*(fl(tt"^>""^" TiEff fiETUSB 

3240 PRIilT 

2250 fOR E=l TO H 

??4l) IF I=S THEN 2290 

2270 PPTRT ":--; 

2280 GOTO 2300 

22T0 PRIilT ■^:-^p■! 

2^00 MEXT I 

7310 PRIHT "'i- 

2320 FAR J=1 TO V 

J33Q PRlItT ''I"; 

2140 fOR 1^1 TD H 

ja50 IF IICIpJl;>3 THEN i=U^ T, J?-4j5«T0 23?0 

2340 2=VCIpJJ 

2370 [P l<2 THEN 2420 

7350 If ZOVdpJJ AND yCIt1,J)>3 THEtf Fflm "t^*";:BOT0 244Q 

23?0 If ZOiJdpJ] IHtN PRLttT -« *;:aOTO ?440 

1400 FRIflT " ■; 

3410 SQTD 2440 

2410 TF ZOliCI.JS THEH PBIHT *«r';:ijOia 2440 

Z430 PBllfT ^ ["; 

2440 NEKT I 

?450 PRINT 

2440 FDR 1=3 TO H 

24?0 !f V(ItJ7>3 ITfEU Z=^<t^J}-i7WJH 2490 

i4ffO :-VilpJ] 

24?D IF 2-0 THEN 25fiO 

2300 IF Z=2 THEN 25i0 

2510 IF ZOVa.JJ flHD J:i'J THEN PRINT ^'^tt^tiSOTfl 2^70 

21?0 If J=y TtfEH 2J4I) 

2530 IF :oya,J3 AHB UiI,J*11>3 THEJI FRI»fT ^:«";:1jOTa 2570 

2S4I) PRINT *! T 
2550 fiQTQ 2570 
25iO PfifNT ":--"! 

^570 NEST ] 

25B0 PftlMT ":" 

2590 HEJT J 

2400 PRINT iFRIHT 

2410 RETURN 

2a2^^ PRir*r-FRIN[:PflIHT -DO VQD UANT flflQTHER M*ilE"!:lH?UT A| 

2fii0 IF LEfHC*t,1J="T" THFR PRINT : GOTG 210 

2£40 PRINT^UD 

01. 
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Nillfonaire 



Rutr 



In Ihis game, the compjfer takes you 
through /our life from birth to death. 
Along the way, you're asked to make 
some petty and some other ralher 
crucial decisions. Some of these 
decisions regard what kind of job you 
want, how mucti you bet in Las Vegaa, 
whether you buy a valuable coin, 
whether you elect to lake a vacation or 
a aecorKi job, stock purchases— 
buying and selling, automobile ac- 
cidents, tornadoes, and the like. 

At the endofyourlife(ltgoesby In a 
flashi) the computer tallies up your 
gains and youT losses and tells you 
where you stand relatn/e to becoming a 
millionaire. In ten plays of the game, 
the most we ever got was $379,000, 
somewhat short of being a millionaire, 
but probably, all things considered, 
more realfStic 

MilNonaire was conceived and 
written by Craig Gunnetl, a dreamer to 
the very end. 



KlUIOirAIItE 
EKE Aim COIPUIIHS 

flouts TIB*, HEU JEB^Ef 



THIS 15 T« BMC OF ' n ILL iOM IBf ' . ALL (OU SUST iO I3 
TrPf If VDUIt fMfi Ul AHSUEr SOIIE i1U(5T1DN9. Trif 
DECHIQ*? voir HAKE UJll. KIEIHirNE MOU riUCH HOUEI THU 
nAKE. Bl THE TIM Of tCOR OEilIH, SWf Lltl UILL BE 
RtlEI IT mC AHOUtfl Itf nOIIEr LQU PfiDE IMBCUCHHUT 

lOuR irrt. IF iwj Mki PAK ti,oflo,M* , vau utll k 

1^ nlUIOIIillRE 4ill tfH TUf G*1E. HMt HHtSf BTE'JC 



0,11.. ITEVE, TWTa 15 mW "£> UFEl 

III 4 IKIILL IOH», M HI JO < >95lJ, UEVE IS 

YOUH PBffElfTS *»E VtlT PODI:. Oil J<H I* , 1«« 

LEIilE HQlE US7JE I 4)0 

TOir SOT 4 Vfd J^ AS fi FDDTIitLL PLAlCR. I^U EflHB 

rOU ABJUSr TOIN ElP£llSe9 TB t IIDV4^ « lEA'- 



ITHI 



t 1111131 fl 1CA> 



toy QO^ 1E5 



IKE IQGTDB S4I9 lUU HEEH t VACilTIDil. 
00(T5, THE JUCSTHTII COSIS I 3471 

mu iicu itav£ 1-22&1 

Tflf ItTEHESl IV TOUR LOU IS 1 1)92 . IDU HAgE f-ie^J 
T<U Oe TC L« «6«a TO 6j"ltE. HOII BUCH BO lOU HIT IflO 



TOU llOll I IIS 

inu van i'lfE i-j7» 



TflUt 


EAftHlHSS AUB £XPEII9E3 LEAuE 


YIHT UITK 


AH A , 3IM£ 
HFU3 FLAlHn^ 


A TDBMAID Hlh^ JUST kIT THE 


T«Olt 




1 4J33i 
AMI ElPCn&ES LEAUE TdB UfTH 



t 47339 



ME)H£ OF STtVE 



* 7T1M 



^•OR BlTAEfirFftTllCR ftltDVH? JUST CIED. (M" ^ HE LEFT 
TIL t fte^?3 , SHT FlfflERAL EJPtHSES AHC * IHSfl? 
flU EMMI HAVE I 37734Z 
TOtfIt EAMIH9 AMI EICpEirSES LEItVE TDtl BlTH l 1?44^9 



TDIJ Jlfl8T HAS A M* flCriBEHT' 

ARE • It?? - RCP^^IR^ CO&r ( 

tin NOV HAVE i 9S7RfT 

TOUR thWniUK Mt CAfEMSES L&J^VE m UlTtf T ^*^W1 



P^ESIGAL CnTI 



HAr 29 r ?D3B 



YaUR IWNE H44& BEFM RDIBti OF OOOBS UDRTH t l3B7fl 

you HDV HAVE * 131013 _ 

1DUR EAftHL^rSa A» tKPtNSfS Lt^^L TDU HETH 1 214433 



HAT 
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3041 












OH- 


"TDU 


JI-3T QOT CAKER 


. tlEC^ICAL 


RTLL^ 


ARE 


4 413S 


tflU 


AAt 


ITEAD ^CfMJLIi 


■'BT 


rElL^ COUL[ 


1 JfflJT? 


*T 


THE 


4^fl£ 


OF 


&3 . 












TDJ 


HAD 


t 2^]fn 












HDT 
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2» 

^e 
&a 

Q» 

ICO 

im 

IM 

14C 

1tO 
170 
ISO 
HD 

;?io 

?70 
2W 
2*11 
251} 
240 
270 
2B0 

310 
370 

33a 



(TEH 

PPINI 
PBIHT 
PSlltl 
PItlItT 

PR: INT 



1 PlUlir T*>(?3);-lllLL10llflIBt" 

z ptHii rfli<:o>;"i;««TiVE ci]iipjti*ic- 

3 PST"T T^lE'^a^!■IIOIfBl3TflUII, IIEU JEfi»1" 

4 PPINTlPFTlfliPKlKT 
10 SEH niLtlOMHiE B1 Ctai6 flUB«IT 

■TM33 IS THE O^HE OF 'hllLlWPlM', *IL fOO tlUST W IB" 
■TyPE IN roDG IIWE AIID iHUHEJ SOllC BUESTlOllS. THE" 
■DEC15T0IIS m HME OILL DETERnlBE HHU MUCH MONET TOU" 
■HftKE- 4T THE THE OF SOlKr DEfiTH, WIS UFE UlU BE" 
■SflTEB BT THE ft*IOU*T OF BIWE'r TQO IrtDE tHBOII6HOUT- 
■TDUIt LIFE. IF tOV Wfl^E t-flDE 11,000,500 , JOB UILL BE" 
»fl ttllLJOWXE MO UIB THE 0"*- "«•£ PLEfiSE'; 
LET n=-i 

FOR T'l TO ( 

LET Sa>^l50 
NEXT T 
lirPUT 4* 
PRIHT 

PltUfT -O.J,, -IM;-, THIS TB VQUP HEU LlFEi" 
LE T ll»= ■ JftNF EBhflmiPWB ftU JH JLL*OOatPOCTIIOVDEC ■ 
IF rcifD'llJ.5 BOrO 2211 

PBEiiT -nil ii US F'ftM"; 

GOTO 230 

PFf'IfT -llf H 5B«-^ TCUH"; 

LET t"tl*!lir^Baj«'?J4| 

PBTNT -, ON -;fllBHnt,3*T-2,3i;l»T<flllHl3-2B)'1;-, 1«0t"? 

piriBT - ■;&•;■ la Mt"-' 

PBIHT TQIIB P4PENTB i*BE UERT ~i 

IF |rHIM]>.a SOTO 310 

PUNT "ftlCH. "; 

LET N-INTlEH[Hl}-50(OJ'lflOaO 

GOTO iSi 

PHUT -POtfl. 'i 

LET ||.THT((BHDO)HfHL1f))/?»IOM> 

LET T = mT{ffHHrJ-lif-'l 



3*0 LEI f-(9?i*IllT<1WHII'lOJ 
330 Pi INI "QW -jfllOflH/'J-JT^I^T'?; 
3W PBINI -LEft^ HflK UlIH I'-H 
37) LET r"TirilT{ltifiM]«3>tl 

310 Bosui tat 

3fO FOB i'f TB 13 

400 IF TJ/3>-IlfT(J/3>-ie>0 TriEB SOSDt 

410 LET B>tirT4ZS'RNB(l]>t1 

430 PVHT 



TT;-. tou- 



440 PRiHT tti»ili«,ni-2,3i;D;-,-;T 



450 
4A0 
470 
410 

4T0 

^OV 
SfO 
92» 

a4B 

su 

340 
S?0 
^#> 
5»i} 
6»» 
dIO 
d?0 
d» 
444 

i7t 



IF T-I9BO(70 
If RlfII11»^5 



OBTO 



500 

^00 



ARE 
OF 



JlfAQ ICOIU'HT 
';'r-i«o;-.- 



TELL, CIUIO lOUTt AT THE" 



fi90 



PRIirT -roB 

PRIifT -AOE 

BOrO ?370 

IF ll>':a BOlO StI 

LET l'IHT1.07»f9»r-l>) 

ItT h'h-T 

PRINT -THE IHIERCgT OH TDUR Ittit Tfl t'Hi'- 'O" "«* '' 

LET 0-[NTri3*RHBlirK1 

IF D{a)=l OBIO 940 

LEI aia>-i 

ON flQTO STO, 1010, HOC, 1220, IMO, *43t, 1^30 

ON l0-7» 6QJ0 IBaO, ^fJO, 2060, 2120, 2240, SISO 

PBINI -TQU *0U BflUE t'iH 

IF D<-? BmD 1S30 

IF J-l SOTO A40 

LEI N=N4<E-C}<r? 

rtlHI -fQUn EARHIHDS ttS EXPEHSES LEAVE 1130 VITH Cfi 

LET T9=INT[(lHDflH*H5 

LET T=TiT¥ 
BEICT J 
SOTO 470 
REN JOB i\a 

pHidT -1 01 aoT fi «M JOB Ra A ■; 



105 



HQlf rtUCH DD TDIF HE ^ 



700 QK IHTrPJil-ni^Sh*! GOTO 7^D , 7?1>p BCJS, fllO 

71fl PRI«T 'lEACHtR"; 

7215 LET E^IHHR*IBn J*40fl0Tt-l7(lO0 

710 QtlTQ 550 

74CI PflIHE "IflUTEr'; 

75(1 Lft E^lilTCHHDn^=*^U0iJ0?*Bi5ClO& 

7il| fiOTO ftSU 

7?0 PeiNT -CattPVTEft fflQftRftMrtEf^r 

?fti5 LET E■lhT[R^tIHn'!Ja5QJ-^ 20^50 

BID LET E = l^tltHilB^t?^20l>'^^+■1iO^^O 

BZO QOTQ B5D 

830 PKI*IT ^FttDTBftLL FWiER^'; 

Sid LET E=I«T(ftNnn^*10fH)Ofll+tOOOOO 

fl5D LET t"-E-HlllCllI*lHTLCRHIinJ*fl«IK1?>*5C0C) 

it\> PRINT -H fOU tfiJiH i";E;" a iFrift." 

a^O PHIHT "tflU AUGUST TQJft EXPENSES TO *";E;" A TE*B." 

380 RlT-lIRM 

8^0 FRltfr "TBU Qlf TD LftS VEOAS Tfl QAPBlE. 

9llfl INPUT B 

*tl> PRINT 

??i? !F 3<=il aOTQ lOdD 

OJO IF [:NII(n>*? &CITD *7» 

9iiy LET S2^-C*IT^ftNIi<ll*5J 

«1> PRINT -Hft" Hft" TOl* LD3T I'^'SS 

9ii> BO IB »9D 

■J7& LET S2»INTUFeNftaj4ftHTJM)J*ai 

?B0 PRINT ''rou uaM i";92 

9»0 LET H^lt*^2 

ICOD BDTD 5?i} 

TOlO PRINT "rOU ARE QFfEPED A COIH SUPPOSEDU UORTK tlOD.Ml^/' 

IflJO PRINT "D(l TDU ttlT IT"* 

1030 llfPUT Zt 

1040 FPI^r 

1050 l£T V7 = IKT[R*fBm*2fl00i)0h*l 

lOiil) IF I*on" GBTfl 1080 

TC70 LET B^M-lflOflO0+-V? 

t080 PRINT "THE Vi^LUE OF THE COIN 13 f'^W 

1^90 GflTQ 510 

1100 PSlttT "TflU ARE 3£RI£IUSLT SlCtL- aOULDfl-'T lELL^ COUiB fUJ"?** 

ItlO rSlKT ^l-DU HALPE "j 

11?^} Ofl llNTlRN0n^*^)*l3 GJlTfl 1155^ lt70 

1t30 fHlNr -THE ftSIfl-mSFEP^JA REGIDttALl ftlFNQllt FLiJi Cflflil.'^ 

1140 BOTD^n^O 

1S5D PRINT "CQttPiJTEP ITEB.* 

1U0 BQTQ 11S0 

>1?0 PRINT "I^JFEDTIima FflT*LT REaCClRIHG CFfPDHiC lAH BREATH,- 

tIflO LET U=IN"frfi|lB(^]*100(l5*50Cl 

I1?q L£l N=N-U 

1200 PfllRT °HtALlli EXPEN3£5 i:CI3l TQU i'jU 

12FD GDTO 5f0 

1220 LET Fi|KTCRN£f[]^*10(fOQO? 

1H0 LET CB = INTCf/2l-INHRttBM5 + CF/2hJ 

n^O PRINT "IQUR GRANDFATHER liPOUtR? JUGT DIED. CDH!f HE LFFT* 

t^50 PRINT "IflU riF;"p Bill fJHERftL EJPEhSEE ARE *^;Cfl 

1?^0 LET H=R-C04F 

1270 QfllO IfO 

U9i| IF E=0 flDTO 9^l> 

12P0 PRIrtT -iSEltf fROH lOUft BD^^i^ 

IJOD ON C[HT(«HllTl*IHO GOTO 1350, 3 3^0 

1310 LET L^ItfTlMHI J*30l>0]-H 

li:0 LET E=E-L 

1330 PRINT "TQU 6flT A *-;L;- BECREASE IN Pftr. TD4] ttOU Ei4ftlll";t 

13^0 aOTD 390 

1350 PRINT "lOU-^RE FIR£B! {HA!>* 

IJfti LET E=0 

1370 L£T C=Iil"E<C/0 

13Bl> eOrO SfD 

1390 LET Ri=INTCR«D(t]#SO00?t1 

1400 LET E>E+R6 

T410 PRINT ^-TflU SOT A Rfll?E Of J-;Ri;"- "JflO flDH EARN J-JC 

I4?0 SOTO 590 

1430 PRINT "THE BOCTOH SAIS ^ NEEB A VftCATIOH. BO im Qfl-f 

1440 IHPUT :» 

1430 FRLMT 

1460 LET V=[MT(AitBn^*200l>]HOOO 

14?0 TF Zi=*H* QOIO I5O0 

T4e0 PRTI^T -BOOB, THE VllCitTlOH i:aST3 1";V 

H?0 QQTO lilfl 

1500 PHIHT "TflU JU5T HAS A NERVQVS fffifflltBaUW- flEOTC*L C0GT9 - *^;V 

1510 LEI N»fl-V 

1^20 GOTO 5?fl 

1S30 FOR l^t TD 4 

1540 LET 5(l]i:IKT1llltT{RHBa3+1OB]-^lO0-^2*SCnh/3» 

Mia «ei:t i 

1340 PRINT ^^ JTHrir PfAflE PRICE 3HABE5 DUNED* 

1570 PRINT "1 IBM nHCREBlBLV HAJ) HACHINEE) -pSCIk;" ";3C5J 

15S0 PRINT "2 IISB 1U5EL£SS 1 GTIHKT STEEL? ^SCSh;" ";3^4J 

15?0 PHIHT "3 NCR INO CASK HETUR^IJ '^BOkj^ ";SC7] 

IdOO FRIHT "4 TUA {TOTAL URECK AIRLENE9) -;SC4?;" -;549} 
I&IO IF BC99-=1 BEITD 2410 

1i20 fftINT "im fOU BUi^ 5ELL ftlOB FEE>^ OR NAT CB,St Oft J*)^! 



UJO INFUT 31 

1i40 PRINT 

1650 If Zi="5" flOTO 1?40 

Id60 IF E1^"H'* tOTO lOlO 

1i70 PRINT -STQi:!: i ^^HD ttUftNTIT^fJ 

liflO INPUT ^ipSCOJ 

ti90 FSIHT 

1700 L£T St44S3>=9^4-+53J-ta(0t 

JJIO LET a-2 

1?20 LET li=H-S^S3>*3[DJ-tOO 

f?30 OOTO ti20 

IMO PKEHT "STOCK H flrfO QlArfflTt"! 

1750 IflfBT B^pSS 

17*0 IF ?NLK1K.5 UOTD IGGO 

1770 IF S5>3C4-tS2? 6QT0 t74t 

1710 LET SM*??5-St4-tS2f-SS 

1??0 LET N"N*SCS23-PS5-1C0 

IBOH 0D30 1^20 

1B50 lET S1-^(5^■+BCi?-^S<^J-^5^fl] 

1320 LF S1>0 GOTH All 

iBi: LET B«-l 

1B40 GOTO 410 

1B5i] FRIffl "NtUS FLfl9HlM -; 

1B60 PRINT -A Tflftnj^M HAS JUBE KIT THE HONE DF =';Af 

1370 OOTO 1G?e 

lese PHLHT "A*! flIRFLftHE HflJ JUST CRA&JiCft IHTO THG HOHf Of "fft* 

1»?0 LET BB=[HT(RHl>MJ*5000flHl 

HOO LET HiH-BG 

1*10 PRINT "BAflAGES HAVE BEPR E3TIfiATE& ft? r^SR 

1920 60TD 590 

19J0 PRINT "DH" rOl JUGT 6DT "J 

1?40 If V-1?G{i<55 BDTO 2000 

n50 IF 1rNDMh>.4 OOTQ 19BB 

l^fiO PRINT -CANtEft"; 

1970 BGTD 2010 

19fl0 PRINT "A HEAfiT AITACH"| 

1T?Q eOTQ 2010 

2DO0 PRINT "LEBHEMIft"; 

2D10 LtT N2rIRHRNBn 3^10003*1000 

2a?0 LFT N=H-H2 

2030 fRIHT ■* ItEBICAL BILLS fl^E <";H2 

2040 IF RNBnK.5 IjOID 170 

2050 BQTD B?0 

20iO PfifHT "IQO JUST tlAB A CAR flCCTOCNT^ HEIieAL CDSTS" 

2070 LET N3-lRTCRNIK1?*30D05+-(flOO 

JDBO L£T B7"IKTlRKCin 3^5000}t-HJO 

20*0 PFrlHT -AffE **;BJ;'^ REPAIRS OUST t";a7 

2100 LET M=H-H3-a7 

2190 BDTO ^?0 

2120 IF E^O BDTO 1010 

J130 LET E2MOO0l>*IriT[RMBn]T5DeOJ 

2H0 Pfifiil "lOU ARE OFFEREB flHOTHEP JOB FOR 1-;E2|" A tEAE.- 

21^0 PRkHT "UOULB VQU LIKE TO H0ONLIGH7"; 

2U0 litPUT U 

2170 FRIRI 

aiao IF It="H" SOTO 190 

21?0 ON iHT^RNlLl^f^? GQIQ 1330^ i22Q 

2?00 LET E=E+E2 

2210 GOTO 590 

2220 PRINT "FROM DVERl^aflfi "CDU SET ■? 

2Z30 GOTO im 

22iV LET R2 = I*fTtRHl(1)^IOOtO>450« 

2250 LET PI-H-R2 

2Z40 PHIHT ^TBUR HOHt HA^ BEE* ROBBED Iff" OQDBS UORTH r^fQ 

2270 flDTB 59B 

2200 IF Q=-l GOTO HK 

2290 IF S*tDa]^? OOTO Uit 

2J00 LET B4^JHTCRHD^1»=«4] 

2310 FfilHl "STOCK HARHET CPASH m i EACH QF T0UR-;B] ;"' SKflREg OF 

2320 FRIftI '^STflCH 13 UORTH r;Hr. fOU J*t]5l SELL ALL BF THEft" 

2JI0 PRINT -fBR A TOTftl OF i";S1*14 

2340 LET HaMtSUB* 

23tiO LET fl=-t 

2340 BO to 590 

2370 PRINT "TOU HAD *";H 

Z190 IF 0=-1 3BT0 2410 

23?0 LET a^^l^l 

1^400 GOTO 1530 

2410 LEI Hi^*Bt1>*S(5J+9^2)*3<6>*fi(3HSt7S*St<545<aJ 

J420 FRIHT "HiTM 3 rOCN VALUE TOO KAUE l";fl 

2130 IF H<0 BOTD 2^80 

2440 [F N^SOOODO BOTE] 2^10 

3450 IF H^IEtOi OO^Q 2530 

?,AAO PfilRT At;" UOHSI YOU A^E A N ILL CUHA IRE 1 1 ' 

2^70 GOTO ii4^ 

2^00 PRI«T 'VBU LOIIST tm>"5 riOU TOUR POM FAflILT HAS 70 Pfl' 

2490 fRlNT *OFF TOBR DEBTS * *.►.►*. " 

2500 BGTQ 2540 

2510 PRINT "HOT BAE^ '!** 

2520 BDTO 2S40 

J!30 PRINT "CLBSEp -iAl;". riAfBE NEXT LJfE," 

2S40 PBIHT nHAilKG FOR PLftTlHO ^JIIUIOHAIRES "JAIJ-ilm- 

;?350 EflB 



Hinetaur 




In this game, you are in a three level 
cavern. Inside the cavern are ten pillars 
which stretch through all three levels; 
they're electrified soihal tf you touch 
Ihem you are immediately vaporized- 
Furthermore. there are trap doors 
which appear randomly and drop you 
down one level. The top level Is three, 
the second level down is two, the first 
or lowest level is one. If a trap door 
appears in level one you are dropped 
into a bottomless pit and that ertda the 
game. The minotaur itself also poses a 
hazard. If you wound him with your 
spear, he will charge you. Also, he 
randomly charges for no reason at alt. 
However, he only charges in astraight 
line. Hint: keep at aslighldiagonal from 
the minotaur until you are ready to 
throw your spear at him and you have a 
better chance ot avoiding his charges. 
I* you ask for a map, the axes ara drawn 
in with X's. This does not indicate a 
barrier or fence; you are free to move 
across the X and V coordinate planes. 
However, you are advised not to move 
out of any ot the four edges as this 
represents yet a different form of 
bottomless pit and also ends the game. 
There are many, many additional 
hazards which are not shown in the 
sample run. Try it, and be surprisedf 

This program was conceived and 
written by Pete Klausler, 



^=> 




MlflOfflUfr 



fOU A<ST SEAT i SCDRt OF Jd. 

at TBU HELD mstfruCTTQUS^ TES 

THE DUECT OF IME SAW IS TD FLlLL THE fllHDTAU^ 

««»*« I ***** *»**»*4 *41 ** *** **« CIlUEl!^ *■*•**** ******** t*t f * * ^+**** * 

TKt t^VEFEII OF THE NlWfUU? IS lil THREE 
LEVELS- IKH LEVEL IS A CQO«Bl«tT£ PLflHE 
OaiSIDE OF THE LEtfEiS THtBE [S NQ7HIHS SUT 

vAceufi. rm pumes stretch qui id on each axts 

FRI^h THE QKIflin. 
4*t«*tpv4 *Tt** ♦ **** ***+•***+** t HUZ ARUS ****^^ *if *n*t*+*******4****** 

lliRATEff5 

INSIDE THE CAVEtH AKE }^ ELEfTl^IFIEl 
PILJ-lifTS STfiCtCHlfiB THflVUQK THE THREE 
LEVELS, THET tflLL TtESTRDT AHTTHI«& THAT 
TeiTl^ltES THEN J ^ 

TflAPOaORS 

Tfti^FaOOAS UILL APPEUP QVT OF HDWHERf 
AHD DHOP TDU HOUfl OHE l£VEL, IF TOU UEEE 
ON LEl^EL QNEp TOV LOSf L ! 

CH^frijlflG HlflQTAUJr 

THE AIMDTAUR lIlLi CHARGE IF TOU 
VDUim Hitl UITH TQlfR SPEAR, AlSI^, HE 
ftftt CHftSil£ FIJtl ND KEASCN flT ALL--'^ 



BEST AAE TWP CBHtftOL FUNCTTONS 
n AQVlhG EAST 
2) ttOvlNG UE5T 
3? tlOUEU& M13RTN 
43 HQVillG SDUTH 
31 *IOyi«G UP ^ LEVEl. 
«J flOiJIItl] DOVti H L£^L 
?> TNSl^JilWt TQUK SPEATt 
Bl UTTIMG A HAP 



»r*** ******+* t****ttt***t*«t** HAVE FUR ***■«•*••*«***«**"*•"►* 

1(T7 
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I UELL NOU SET 


IH 


E ^ARR 


ffAEAUR » 1 




-? 


, 5 ^. 


LTFi^RIER 1 2 




1 


,-j }. 


SAfiklEft « 3 




4 


p-t K 


^ARRIEU 41 4 




-? 


, 2 U 


Ei^RRUR i 3 




H 


, 3M, 


gi^^lZlER ■ & 




-4 


p-i k 


enfiRiEK 1 ; 




3 


p ^ k 


DAnS]» H S 


it 


-; 


,-i 1- 


SARITIER 1 ? 


tf 


1 


t-7 ]- 


B4E:R1ER » 10 : 


(- 


1,4? 



IER5> 



iJttlCW LEVEL tifl Y£H] Uflflt TO STftfiT D»^ 2 

UHrtH fOIHT? UtO 

hQU FAR ID TttU Ui4flT TO MGyt PER A TIRNT 4 

TUKH 1 F MINHrftUB IS AT < 1 r tO ^ D« L. 3 

ffflJR CONTRQL^ i 

TDU ABE AT C » , U >f ON LEiJEL 1 ^ 

THt HlHDiAilft IS DH^ffeiHC. 



LEVEL 

1 P P 
( B . 

1 
C 
C 
( 

f 
[ 
t 

i 
t 



7 

5 
1 

2 
1 





u 





i 

10 
10 
10 

10 
10 
IQ 
10 
10 
10 
10 



TdV ARE NOU A iTtlALIflED CHAHPIOUF 



fl[«aT*UR JUST FPIED HIHSELF 



UOULS YDU LIKE TH fLAl flGAIH7 1ES 
I URL NOU SET THE SARR]E^S. 



eAfiRlER 


t 1 




■3 r 


TO ). 


EARRIER 


t 2 


■ In 


'1 1 


7 ^. 


BARtlER 


H ! 




1 ^ 


4 ), 


BARRItft 


H 4 




1 J 


i 3^ 


BARRIER 


t 5 


tc 


10 


1-1 5- 


SPRRIER 


1 6 


f ^ 


-2 p 


-10 ). 


BARRIER 


« -? 




3 r 


J k 


RAITEIER Jl fl 




-? , 


9 k 


BARRIIR 


H ^ 




^ t 


7 >* 


BliRR]tR 


It 10 : 


^ !i 


,-a k 



UHrCII lEWEL Bfl YDd UPNT Til STflPi DUi 2 
UirJCH PDIIfTT Q,0 

mn fan aa tqu u*(T to *iaufc fei' a 'uftNi 5 

TURN t . ninaTSUR iS AT 1-4 , a ?, DM t, 3 . 

IDUP tnNTRQL' 5 

YQU flP£ ft! f I) , I, ON mifEL i , 

TURN J . nTftOTrtUR 15 AT (-3 . G J, Qi* L. 3 , 

iaa asf nf i l , o J, d« li^"el 3 - 

TftftHfl*il*Afiflft'infl« TftflPllOQR, (QU JELt DDtlH QNE LE^ifL 

TURN i , ItJifQTfllllt 15 fll (-2 , B fn UN L, T . 

mils COfflSOl.! 5 

TUL" ftRE at I 1 , J, M LEUEl 3 - 

rUFff fl . nlWQTflim IS 111 (-2 , a >, DN L. ? . 

'IBbR comeuLT B 
UHftT LEIfEL? 2 

f,,>: '. 

...B ex...- 

, ^fl-x.. 

...*:< B.... 

,„,. IB.,.- 

., -.X 

>B. 

,.. X.,B- 

.„.., X 

-,>.... 

X.- B 

«.,..,. 

, -...IT 

...-.,-..,]... 

X ---, 

- X.,.,.- 

,,-,.( -- 

l...,B-.^,- 

..,.. i. 

..B.H 



LtVELJ 2 



l-IOI) 

(HfllNOIflUB 

$<SPEilR 

B=BnilRjER 

a^DRLBlIt 

J=fiXr3 



TIM S . PJhDTiVIR t9 4r r-2 , B ?, UN L, ? 
JOU ilftt *1 < 5 , ), Olf lEIiEL 2 - 

THE niiiaTftjif r? thflRol-fl. 

Bzi I r 7 zz zzzz ZZZ IIZ 72ZQ jbt n mDT ulir 
TCU UIN, (OU lUCKS SHAB 
tOU ARE NOU A DUftLlflED CDflHPlQNi 
UOULD rail LTKt TO PLAT flGUIfi +J0 



Jljgt FITIEB HIIigfLF 
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LIST 

101^ 

120 

130 

UO 

1?0 

IBO 

1^0 

195 

2DD 

:5I& 

220 

230 

2^0 

260 
270 

I^Bi] 



PVINT TflB{W)"ni«aTflUR^^ 

PRINT TAB[l5J"Cfi£fir3^'E i:Ohf^UTINGp ftD RR I S rDEI H ^ HtW JEaSET" 

FS[MT:ffiIHT:PREKT 

L1=IHHR*fpci Jf3h^( 

J1'[iniR»Bf1>^C-2lH*ll 

T1=IHTCKrtIHl)^(-21»)#n 

ttoauB IJIO 

REti INSTRlfCTEONE 
[^CiSUB Udl} 
RE ft ffflftRlERS 
GUSUB 23J0 
RtP PLACE H^LrtVER 

REH BJhtU CArtt 

REri SPEIiR 

IF K2=91 AND T-3'32 UMIT Li'tiJ Mt r>T THEU Jii?S 

REJI IS HE ErtTEN? 

IF K1=S2 AND T2M ANH L1-L2 THEN 3i?Cl 

REH CHARGING 

[^ RHD4EK.1 THEN 2950 

R£fi rUIlN f 

T = T-tt 

pR[*^T'■^^JfiN■^;T;-^ HiKOfflUR !5 at c";Jli"t*!'f'!^Ip ON L- ";Lir-" 

Pll[«l "lOUt CONTGJlt"; 

[KPiJT z 

QK Z 6BT0 qOflp^30^450,^B^)p^e^Jpl30^550J:?7ft 

>:?=;t2+r 

GD7D ItSO 

X2tK2-F 

GOTO lilt 

TZ=r2+F 

TF AB»a;»>10 THEB IJiO 

OOTO 421} 

f2=r2-F 

GOTO 4^1} 

L2°L2*1 

IF L2>3 Dfi L2<1 IHEN 1330 

GOTO 420 

L2H2-1 

QOrn 510 

R£H 3fEflR-THRfflJI*fG 

IF LlOL? TH£N 1 MO 

Xl<»:2 AND YK>"r2 THEri HOD 

XIC-^k: and ABSit1-^2]M{i TflE^ 1120 

flBS[i1-:t2h>10 THEB 1120 

S?^1 IHtN 3720 

"IN UHICH DJHECTIITN UOULfl TOU LIKE TD THMU^I^SE tT^j3,4>" 
HI 

■HflU FftR"; 
HZ 



3?0 
?00 
910 

?20 
930 
?IU 
V5^J 
9J0 

9 BO 
^?0 
100 
10i 



IF 

If 

IF 

IF 

FRERT' 

IHPltT 

FRIHT" 

INPUT 

S5=X2 

S6^r2 

FDR HJ=1 TO fi2 

ON N] Goto i95,?2D,7«^;:'0 

S 5= 554 1 

IF AP^CS50]i} Tti£H SU 
SOTO 79 1> 

GDTO 700 
H = Si-I 

[F AHi3(Sd?M0 THEN 86^ 
GOTO 791) 

GOTO 750 

PfilNT^'SPEpfi IS AT {";55;'\' 

REn TEST FDH BARRIERS 

FOR A=1 TO 10 

]F %i^i[A} ANI^ Sd-CCA? [blEli 

NCKT A 

edto e:^o 

PAINT "SlilSH £PEPI^ gpLlTBtED AGAINST EARIiJER «-;a;^" 

GOTO IHfl 

HEKT HJ 

IF S50X1 OR SfiOTI THEN 1010 

^■IHTfBNDn Ji5] + E 

fltt ): GOTtt 9tOp10lflp107U 

PIr[Ml"-rQlt IlLLLED THE NlilQTilUR 

flOTO 1450 

PRlttT"UOUi.B VOIt LLKt TO 

INPUT II 

IF K*0"IE5" THEN 37iO 

7^0 

L1^|HTiRNI^13t-3tt1 

X1-affHRifBn>*t-21 5 h*11 

Tl-]rtTlRJtBM3t<-21?^»lT 
i> GOTO 2311 
U PBINIHTBU HISSED. SPEAR IS j^T ^'iSH^'■iSi;"l, fOO EtJST GET IT- 



■;Si")/ 



Q30 



IN";Tr'TlJRHS.' 
PLAT AfiAJN"i 



1020 &1^S5 

1D30 $Z-S6 

ID^O S3=L? 

1050 3^=1 

10^D eDIO 2G0 

19711 GU^UB 2G40 

HSO PRINT"IDU ftPE tfOT OR THE SAME LEVEL* YttU CANilOT TGROlf," 

1?fO &QTQ 120 

tIflO PRINT"TDU AHE NOT ON THE BANE XDR T LINE. TWJ CAitNQT THftOU.* 

1110 OQTO 430 

1120 PfiEilT-Tai ARE NAT IIITHlh 10. TUtJ CANNOT TWCU." 

lUfl ODIH 420 

^t4fl Pftm-TDl- Afft HDU UEftPONLESS. W\l lUSl, SUCKERt" 

11^0 ODTQ f30 

1140 fRINT"fAAAAAAAAAAilAAAAdH TOU FEU. DFf THE EOGE^ 

1]?0 GOTO 1110 

11B0 PRI«T'=TDG ARE AT C " ;i2 ; " , " ;T^ f " > j Q« LEVEL ■?L2j*-" 

11^0 RlN TE9t FDR BaGRIERS 

nJl>0 fOR A-1 TD 10 

1210 IF K2=&CJ4^ ANa T2±CCA) THEN 1241 

1220 NtxT A 

1230 GOYD I2^G 

1241] FRlHT-raif HAyt JUSr FPTEU TOUf^ELf DEt ftfl ELECTftlflED BARRIER," 

125D GDIU 1i:0 

12^0 ftEN TRAF9D0RS 

T270 X = lRTIRiim?tEaht1 

I2G0 IF \=5 THEN 1300 

1190 GOTO ?il[J 

1300 PRIHT"TilAAAARAAAAAAAA}1 rRAPDEHlRr IQU FELL DDUd ONE LEVEL" 

1310 L2=L2-1 

1320 IF L2>0 rHEdJ 1290 

3J30 PR|NT"I&U FELL DGT OF THE CflVERR. ION LOfif." 

13^0 GOTO 11^0 

1350 PfilHT-IrQ VQO U4HT TO BE THE HIJIDTALIfi CHAHF L HH " ; 

13A0 LNP^T L?l 

1370 IF j:?iO"fES* THEN 1*40 

13E0 C2=20 

a?o rniiti'^Tfiii hust sat a score qf 20^" 
1J91 niN cmm 

U\^ Din C^l(72J 

1440 KECilRN 

1430 IF ^9tO"TES- THErt «* 

U6n C33ft/T]t]i|0 

147& If C3<20 THEJI 1i30 

14Gl> PRLftT"rOl> ARE ilUU A QUALIFIED CHAEti" lOEf ■ " 

U20 GDTO 930 

U30 fJ«[RT"GGRR'^ ^fGJi D LB HOT lEAT TKE GHAIlPIilti ^ '' 

li^D fRlHf'DO ^OEJ UANT TO PLAr AGAIN"; 

U5U DDTD ?40 

Mitf RErt JttSTffUCIlOJta 

1i7U PRIHT 

\i?i FDtu;=i ro 31 

U73 PRINT"*"; 

14^6 llEKT V7 

liOO PRINT TABC32rflIIIDTALIR"| 

lASE FDR US-1 TD 3) 

1682 PRINT TABC41?^**; 

1dS3 UEH VO 

1720 PKIMl 

1730 FHIMT 

1?40 PRIEfl"DO IDU flEEO £ECTflUC[ION9-; 

1?4i^ IWPG7 Kt 

1770 IF JL}<>"TES' THEN 3330 

17B0 FRIHT 

IJO* fftlHT '^THE DEJECT BF THE GA1E 18 TO KILL THE HIilOTAUP- 

1320 fftlHT 

1*25 FOR V^'ITQ 31 

1S24 fRIRT"*"j 

H27 REJIT U9 

1B30 PRINTrABC33J"CAVERH''J 

IB3? FDR VtO'l TO 31 

1B33 PRINT TAEC4t5"*"; 

1B35 REIfT 1^10 

1B34 PGiNT 

3fl37 Pfilril 

U40 PRiEit 

mo PSIHT 

1960 fRltfr 

1J70 PRINT 

18B0 PRINT 

1G90 PRINT 

f?lO FOP Vn»| 

n20 PRINT-*''; 

U30 NEXT VII 

19^0 PfiNT TflBli23"MAZARllS"r 

1T^5 FOR U12=] TO 31 

1?^7 PfiiNT TABMtl'"*"; 

194& NEXT V12 

1?50 PRIMT 

1^53 FRJ^r 

It^O PRIHI TA6C32rBARRLEP£" 



rABM^J^ THE CftVERfl OF THf hlHOTiUH IS TH TMREE" 
TAB[12>"LEVELS. EACH LEVEL IS A COORBtEIATE PLANE .■ 
1AB[12>"GUTSEDE DF TRE LEVELG THERE IS fCOTHINO GUT " 
TABn2rVACUUll. TriE PLAINS GTRETDH OUT 10 ON Ei^CH Ak!? 
TAin2)^FRDH THE GAIOlil,'' 



TO J1 



ioa 



IS70 PRINT TflJ^12J" Iff^TTDE THS CUVEflN flfit 10 tLLCTRlFttB 

l4 FflJttT Tflff(l2)-LEyELa. THE. UILL Pl^TROT fliTTHIHB T«A:- 

ZtflP PRINl TABdlJTfllCKES TKEftM" 

2fll0 PfilHT 

2r^<l Fpafll Tfi&li?l"TPAPtia[>RE" 

Mil 1;\Vt !5B[l=r-rtht DRDP m DQNN ONE LEl^El , IF rOU HEftE" 

215C FR3f?T ^fltC^?^"OK LEVEL QHE, IC^ LQSt!!" 

:;i>fiO F"R1NT[PR5P<T 

:]:?S PRINT TftB<2??"CHAR6[i*IS hINOTfl^^E" 

m^ fRiRT T^ftuzr f«E riANorftUR ujll ch^hce if tdu- 

2:?D fRiNT TflEU^^-MDllffH HIM U] FH rfllJR 5PEftR- ALSUt HE 
25flO PEIMT TftM12?"nft^ J:HftRSE FQA titt SEASQh flT riU-lMI" 
^110 PMVT 

2130 VrIHTTA&CZM" HESE ftRt VDUR CUNTRUL FUNCHttHl" 
■MIO PRINT rftBL27?"n MiJyiffO EhST* 
2150 PflCiiT TAB[27]"2^ flOHlNG ilEST" 

^161} ffiittf TAHC?7r-3J *iagi«ij nafcTH- 

25^11 PRINT T«:27r^] HQiJltJG SUUTM^' 

21&0 FfiINT TABl2?r'51 MD'JlNG UP f. LE'JEL" 

M?C^ Plll**T TflBC27r"6? tlByiNB DLHIh A LEVtL" 

220U PRINT TABC27r?J THRQUI«ri TQUfi &FEfiR- 

221D PPINT TflEl2-^ra3 BElTiNfi ft flW*" 

ai?D PIIKT 

;^?3(1 PTlTtfT 

2?*« FBI: Vli-1 TD Z9 

2250 PRINT":*"; 

22*0 NEXT "J13 

2270 PK(nnABt31^""rtfl^E FLW1'; 

22e(r FUH ';n=i TO lo 

2170 fftlttl TflBCfl]^""+*; 

23C0 «EXl ^i^ 

■3J10 PRINT 

2320 ftETURN 

S33fl fitfi BAPfilEtS 

3J4fl PFrJttl "I UILL FfDU SET THE BflfffflERE-" 

2J50 fBR fi=L TO ID 

2afiD BCftJ' E^TtFcNDn?tC-Z1?J+l] 

2J?& CCfl5-INHflNDCim-2tTj4ll 

23flO PSIHl'^BfttftlER l»" ffl ;': C " ;ffLrt ? J " f " ;C LA ^ J^ f ** 

23Tfl HEIT fl 

2401} PfflrtT 

241 P ItETURfl 

2420 RErt PLftDt PLft'^FP 

5iJ0 PftlilT'-UHlCH LE^EL El[^ TOU UflHT T& &TA«T Dil^f 

244(1 I«FU1 L2 

245^> fRMl'-LJHICM POINT"; 

J^iD INPUT KSj: 

2*70 PRINT'KBU FAR PO ^OU UfiWT TO HOflE PM A TUIH'; 

24S0 INPUT j= 

2q?0 flUHt 

:^JOi> CETL^Rtl 

251l> NElt dDUE HIKi][AUB 

?33D 1(4^11 

2330 T1=T1 

2S*fl L*=L1 

2Hl> S3=LHTCHpniM*fiJ + ] 

25iiiJ IIH Ki GOICI a57^^piia^>^2i4^J^2i90,2710TZ76^l 

2S7D X1=XI+I 

25B0 IF flfiStKl]>10 THtK 2A0& 

2^90 Boru 2? 00 

3400 11-JI4 

2ita SATO liSU 

2i2l> K1 =1(1-1 

2iia &OTD 25eO 

2i*0 r]"THl 

:!A5Q IF ftBS[^n>tCt rtlEN Z^^O 

2j&a euio 37S(^ 

;4?ft T1=T4 

2ig0 SOTO 2550 

2A?& IF XI"B[AJ ABD "ri-Ctfl? THEN 2550 

27^0 IjQTD 2450 

271C LlPLl^l 

2?2(l [f n>l OR 1_K1 THEN 2740 

273^ GOTO 27S0 

2740 WLA 

2750 GOTO 2550 

27tt LJ=L1-1 

^70 0010 2720 

2700 FOR Ml TU 10 

27?0 IP :tJ"Hft) Attn Tl't^fl] THEB 2H 

2fiOD flEST A 

2B10 PBIHT 

2^24 G0Tfl2B0 

2B30 Fni411 

2940 FRINT'-itU UOUHDEII THf rtlHOTflUR" 

3B5l> PRINT-THE HlffOTflUft J3 CHflt0il«O*- 



266(1 If ;ct;^K2 THE** ^B?0 

1£7I1 n*1 

?SSO GOTO 2910 

2B^0 H = -l 

210^^ BttTQ 2910 

2110 IF TI?Ta THEM 2^*0 

?9?0 r3it 

2930 GBTO 2?40 

2?41> Vi=-I 

^f50 GGTO^-^iO 

29*0 [F L1>L: F»I£N 2??0 

2T70 !_3il 

2?aU BOTO 30D0 

2*^0 L3=-l 

31I&0 EF 11=L2 TKEK 3050 

3910 L1='1-1 + LJ 

3020 PRIHT'^LEUeL";Li;"- 

3fl^0 G&Tfl 3000 

304D FErt HI TueftE 

3050 IF 11=13 TTIEft 1100 

3060 Il^IHd 

J 07(1 fiOSDE 3HC} 

jsao PRirtT"t";xi;"p";Tt;"r' 

30^ & GOTO 3050 

3100 IF Tl=Y2 THEN 3210 

ailO T1=:Tt-^T3 

3120 i]II5JB 3140 

3130 BfllQ 3090 

3140 FOR P=l TO 10 

3L50 IF &Lf?*KI MD C(PJ=TI TKEit 3190 

3iao he>:t p 

l\ll niurmuzzii'2iiuuuiuo\A^j ahidtaur ji^st fried himself 

31?0 PRlrtT-TDU UlH^ TGU LUCKT Stfll" 
3?00 BCTD 14^0 
3210 PfiINT"flir£ " 
3220 feint"j:hei*- 
32i0 PfliatT-CHOriP' 

3140 PftIHT"05JiP" 

3250 PFJNT"T(]U LOSt ^aaCKER"* 

jiiO GQTO*aO 

3270 PS[HI'ltHflr LEUEL-; 

lieO IRFIIT L4 

J39i> fQR T4»10 TO -10 STEP -1 

3300 FOR J4=-]0 TO lO 

3310 IF 1:* = j:2 and T4--(2 ftrti 1-ipL2 TWESf J4J0 

3320 IF X^^XI ftrtQ r4=-(l AltB L4=L1 FNEH 3430 

3iJU IF L4=&1 fl**I" fJl=S2 ANTI L4^S3 iHtfl 34H 

3340 FOR A=l TO 10 

3350 IF 6JAJ=J:^ flBB C<H>-'T-4 THEIf 3400 

3340 NEXT A 

3370 IF X*"OA**C ^4-0 Tll£r+ 15(0 

l^BO IF X4=0 IIR r*=Cl TttEH JTlSO 
33?0 fR[[tl"."r 

3400 OOTD 35^0 

3410 PRINT"!"-; 

3^:0 ODTO 3400 

3^30 PBINT-fl-; 

i^O £0T0 3400 

3450 IF 5^=0 THEM 3340 

3*iO PRINT-a"! 

Si^<\ 00 TO 3400 

34BO PH]*fT"r'; 

3490 GOTO J400 

3100 PRIHT"Q"; 

^510 GOTO 3400 

3^50 PfilNT-X"; 

3B3Q NEXT X4 

3540 PHlnr 

J550 *IE1T T* 

3540 Pftirir 

31 ?0 PR INT" LEVEL f I L4 

35flO Pff[NT TftB(3ir'KEf 

3S?0 PCTNT TflB(31]"i^T0V 

3600 PdlitT Tfl?[3l>'^H=MIH0TftUR" 

3*10 PRIflT TABC3I>"?^0PEAS" 

3i20 fRINI rABCl1^"B=BARRIER" 

3*30 PRINT TflB<3lJ'*0=0RIGIB- 

36^0 PRINT TftB(3ir'X«Aj:iS" 

3^50 FKEMF 

3*40 GOTO 7=-lO 

3470 PHlrtT"HIIIOTftUR ItOiJEO TO iOllH 5PDTJ WE SAH TOO [ASTEO WitAT!' 

34G0 GOTO ^30 

3490 PR I NT -1011 HAVE TOUR SPEAt^ 

3?00 S?=0 S 

3710 OOTO 300 

3720 PRlBT"HOll CM YOH TIKDU TOUfi SF^dR IP TOO DW'T HAtft OWE?" 

3730 PRIBT"9FEflR IS AT{";31 f "t-pSSr^ "« Lt«L ^JM 

3740 GOTO 420 

3750 STOP 

3740 ENB 
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Motorcycle Jump 



This program, origin^JLy tilied EVILK 
permits you to act out your fantasies of 
being a rrtotorcycle daredeviM Ttie 
game is a simple motorcycle jump over 
several busses, which takes Inro ac- 
counibolhgravilyanddrag forces. The 
ramp angle and molorcycle speed 
deiermme rhe distance jumped. Note 
ihat Ihe infury penalty Is greater for 
long jumps than for short ones, and 
that there is & chance for a crash even 
on & jump of Ihe ngfit length. Ttils 
probability, initially set at .30. can be 
modified in fine 560 to make survival 
more or less likely. 

This program was written by Charles 
Aylworth and originally appeared in 
Creaf/ve Cofnputsf^g, Jul/Aug 197B- 



RUH 



HDTGKCrCLE JUMP 
CJIEAIIVE CQMPiJTIMS 



W^fi£ *r THE 5tCliE Df T« BIQ rlOTOMICLE JUiiPi 
HDU NAHf AUE^ES UILL 1BU TRT TD JUF^f^ 5 

5 ItJSEfS^ TKAT f 73 FEETL 
UllAr GAUF AHLE II ILL TOU US£^ 90 

H lEEREES? TNAT^S IHP41S5IBLE. (:[»(£ Oil JnUp 
UNi^r fiAHf rt«GL£ iirLL TOi? U^E' ^2 
HDU FA9I L'UL TQu LEAiJt T^E fLAFIP^ 4 

SOdI LlJCKE 
A PtriCrUlE JUHPi 
QI, THIS UK HCIU F4Sr UTU. YJlll LEAVE THE BAlF* 34 

BaOl LUCK! 
TItEltE HE flOCSiMi 

444t+4t4t4**4+4^HE JtJHPEB TAB FAB! 
HE niSSEB THE RAnP. 
I TNIBK HE^S HUirr,..,.. 

UELLt KILLER, 7li£ [M3CTCIR SftrS IdU EfiCKE 7l)IJGi 
L.LEB 
(TIBS 
BJCE 

uur TO juHP AeAtir rc9 



Hiu nnt tuBSES uill rou trt to jupipt 1 

» 9U??E9! THAT a 73 FEET I 
IMIliT KAflP AH^ll UIU TBU HSCT 31 
HSU FAST VILL rOH LEAUE THE RAMP^ 4A 

eDDD LUCK! 
TIEftE HE &afa!n' 

«»««44***44nHE^3 *FWHT QF THE l*ilW *-**. 
I THIMK I1E^$ MUAT...... 

UELL, JtlLtEBp THE BOCTM SATS Tim »ROHf TDUfti 

ft. Alt 11 

PtZIE 

L.ARH 

BACK 

iwrT 

HUT TD JDltP AfiArN-T YK 



irUl MANY BU99€S UILL TDIl TRf TO JUHf? S 
5 SUSSEX c THAT 5 75 FE^T ■ 

bHAT RAAP ANCLE UILL TQU QS£^ 22 

KIMI FASr VILL TOU LEAVE t^E RAnPT 4J 

8JIDD LifCKF 

*t4t***44n++t|tC JIABE IT 4 QUAT JVRPp HTLLEB^ 

utiT TO junf ABAi^r ria 

TIU HAI^F IT I DUE GF J ATEEttPTS. 

BE CA9EF0L, iCQll . 

OK 



30 

40 

3D 

91 

t»D 

TIB 

13B 

14« 

ISC 

UO 

ISO 
ItO 
3» 

2Ti> 

ni) 

2U 

2«Q 
?7a 
291 

lee 

31 < 
310 
330 
340 

a^o 

3^ 
3« 
3tD 
4M 
410 
429 
430 
440 
4S0 
449 
490 
4T0 
910 
930 
530 
S40 
350 
940 
9J0 
3S0 
990 
AOO 

a;4 

dJO 
4^0 

d^O 
d&O 
^70 



'Ut^Pf lit 



Tl*t fiCE^^E 13F THE BIO ttUTORC'tLf JUBPI- 
fil^S^tS iJllL TOU EST TO JUnp-Jd 



FEEIF* 
USE'; A3 



Pft|»T TftBCJllJ^JHlTDRCrCLi JUMP' 

PS JUT TABC20?i'*CfiErtTiyE COftPUTIiffi- 

PSIPI TABMB^I^NDRPI^TOUN, NEU JCK3ET'' 

PRIHrtPRINT:PI!INT 

mn I2M43,If(B4] 

lt--^B.iqU L.ARIi B.LEB L.LE9 lACH HECH 

[4*I4t-FACE PEL1LSPKIBE EIHt ' 

t-J 

T7-0 

T3M> 

PRINT 

INPUT 

J-lf*19 

PRINT n;* fluasESi thaT's -jj;" 

IMPUT 'UHAT HAMP ANCLE UILL TOO 

If A2<V0 AM ^2-^ THEH 2)1 

P«NT A2;" EE&REE3-? THAT'S iPtP^^lBLE. 

MTfl IfO 

A-A2*.OT?4; 

^HPOT -liao FAST UILL TQl LEAVE THE UBP 

?R|ilT " eoOB LUCKS" 

LF 9>C [HEfl JCC 

PR|*fT "A l-RACIItF JLIHP^^ 

PREUT "OKt TH19 TINE ■; 

BDTO 240 

£-0 

9>4 
124 

S2"0 

S'3«1.5 

P»1N"[ 'TKEPE HE EQtSMH" 

3^5-55 

F-S*T 

B2*r*COS^A3 

R-F«3[HtA? 

ll2-«*l3ItT? 

It-H-^l^-Bl 

PR [AT **"J 

92>(S/I203432*r 



SKULL ftlBS KNEE lUTT 



conE cw nou» 



AfO 
790 

710 

720 
?3Q 
740 
77C 
710 
7*0 



aio 

S]0 

B40 



?90 
910 

O70 



IF I»"J THEH G=E-ft 

IF B<4 THEfl 4-0 

IF il>B THEtt iSSO 

IF B<J THE4t dCl 

tF B>Jt20 THEN A40 

L-(C]]-J>/3Cr-t|lHD(t> 

IF L>*9 TNE^^ iiO 

PIINT 'HL HADt IT ■ QfifAT JUHP, KILLtAI" 

T5^r3+-1 

90T9 V20 

FIlItT 'HE^S SMBRE CF THE RAHP " 

L3-[MTU[U-Bh/3)«:S^iRNICIh+3^4.33 

(DEO 4?0 

mnX "HE JUMPED TOO FAHI" 

^RlitT ^HE imJTf T*?E RAftP." 

1.:>INT({ C Dt2D-J ^/:ii) J + [|^HBLt )f3J } 

PRJHT "I THINK ilE^S lfURt>*>>».- 

FUN Ki1 TO 3 4 

i24E^^r 

HEXT r 

«"14 

IF LZM4 THEN L2-14 

IF L2<>C ENEH L>T 

FCH Ki| T9 L2 

■l-IHr4RNDCn*10C0h 

U"(U-aNTCVyK2J*k2J)-H 

H2-[2l'J} 

IZ{U3if2(K?? 

l2{K2h-H2 

K!^HJ-1 

NEXT t[ 

PRINT "UELL^ KILLERt THE BOCEQIT 3AT3 TDU fADKE TOUB;' 

Fim i[=M5'1,2> TO F4 

f^C4H2(K3f-5 

PPIifE flt 

ITEKT K 
TJ-T3*1 



?30 
?^9 
?19 
?fiO 
?79 



I4fP0T "UAHE TO JUMP AOAIM'^At 

If LErTKHpU^'T" EKEH fKIflT:PRJHE:C[]TO tiO 

FRI*IE "rCO NAtE IT '^TJ;* OUT OF ^;TJ;" ATIEHPTS. 

PREHE "BE CAREFOLp HdU." 

EflB 
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Nomad 



^■a- 



"Gramma Nomad" is a person who 
doesnt really know wJiere she wants to 
live^ so she moves to a new house every 
game_ Then she sends you a telegrarn 
askmgyojlovisilher.Theobieclofthe 
game is to successfully navigate yaur 
way through the streets of Garbonzo 
City to Gramma's house. See the game 
for more details. A map of Garbonzo 
Cily is provided for your reference. 

Nomad was written by Steve Trapp 
and first appeared in Cf&ativs Com- 
puting, Sep/Ocl 1977- 



9W 



flULEat tH 






GRAflnd NHfl^B 15 fl ^J[:t ffl_J Li([PT UNO MfrS ^QT QIPTTE 
dADE UP ffEfi Plltifl UM;^E 3Hf -jfl*IT"5 TO LI'JC, 
SHE HftS JtdRflDVflh iT (TlJIN FQ SOUEUHtrrt li* ^AffEGtJZB CfTV 
DIB QH A STKE£r CDRflft^ 

fll TNE lEGIHIflftG, THE ^AfLflM STVES TCtf A TELSSSflPi aRITTfN 
BY SRAfTflfl TELLING TOJ lIHEf^E SHE L[VCS. 

Tffll fiET ritTU TOUft CflH IT LflflC JITLi^HrtflF l^rtSHEB LDflM. 
FffDH THEEEEEffE TQIT G^T TO (IrAflr^AS ilQU^E. 




■^O'J m ID QET T"H€RE HITHOUT; 

TICKETS 
FLAT U^Ea ^ 
AUffNIJI& QHT OF 6AS 
DCfl9 £n[l$ 

THE.RE [? AH fl-ttftW fOUllE FJRCE ENFDRCIr^C THE IA\I$ 
OF SABBOfl^O CITr- 

THEftE ftfiE I'BflL"F*rr5 DH THE STIEET^ DF &MeaHi[I 

cirr. 

IP ft PffLICEttAH CATCHES A SRUW!. HE HAS TS 

TESTIFY IH CDVBI 

rUNICH TA»!E^ TitE RES1 AF THf SAHE? 

If A 9Rl>HK HRLlrfli HITS YiMf, VQU -.^SC-. 

AT EftCH JUJiCTiaH, [ IflLi TELL rOU: 
Tlt£ HIRECTIOJf TOU AR£ GQIHG 
Titt HOAD TOU ARE HH 
Tll£ ROAH CBDSSItfQ 

I HELL ASK Tfl^J: 

THE UAf TQl* UANr TO TJfi« ^IE LZFT] 
3PEEC CIH flPH? 

Al OVERPASS 1$ «I3T A .'UrtniaMn 50 lT 15 '"* 

HESELr SKIPPED a«ff, IT 15 rjflArfHQUHCES- 

*IHa? IS ALLi 

L^rtAT IS rom4 EtAhE? steve 

*QD0II LUCK* 

Lf ftfi JtEUEt 

ttnv flffE tCU^ r LI-JE AT iHt CURPIER 

□T ROAD If 15 1 t ^ IIP 

CDHE DH DVER^ 

LO'JEp 

CAAMA 
^n^LEURANdA CDRP. rElCnffj^h C0.>^ 
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I^GING IdOUTH \\H R^A]} H 1 
JUifLTEflN: ROi^H ^ } £ ft Z 
FDRUAl^D, LfFT. (IQIfT Dft I'TURU^ F 

3itl]9i]H..,«U9 fLAtl^ED TOBFC GAR. 

UHAT IS (QUR NAME* STEVE 

*eOQ[i LUCK* 

EiEftR STEVEp 

HDU ftRE TUrt* [ I. TUP fiT THE CSRrtEP 

|}F FriJAG It 1 2: H B 11 I 

r.^^i an oucB. 

4>RAH^c^ 



GDIMG SQITTH a}f liDJiQ 4t t 
JUNCTIDN: RDJ4D H 1 A » 2 
FDRlfAftB, L£FTp RIGHT flP iT-TURNt F 
SPEEIi? JO 

GPINQ ^IfUTH IlK Rrt*If ■ 1 
JtlUdTIDIt: RflAIi t 1 114 
FflRUflRIi, LEfTj RllJHT OR Lf-TUfiri-^ L- 
l^PEEH^ :?(J 
fm^.,.BULLD06 AT£ TUlfl TIREi 



ADftllf? lES 

Uf^AT IS YDUR RflME? BTEVf 

r^&DOB LtlCB* 

KAft 5TEVEp 

HOU AfE TDU'T 1 LIUE «1 THE CnRRP? 

Of ftflftC » 11 1 # < Mi 

CDHE DN OUtft^ 

UPi^Pliii* 
aiELESRIiMft tOfiP. TELEGRftM CD- ] S 



QOTffB saiTTh eriT iraAB n 1 

JJJNJ:TIJ3N: fLDAS & 1 ^ H 2 
FSRUASQp L£FTp RHHT Dfl U-IURtt' R 
SPEfJ^ 30 

G£lMl3 Uf^T QN l!J]A[h H 2 
JUNCTIDet: RaAS 12 J H IB 
FCRU^flEi, LEFTh RI&Ht Dfl U-TUfl|?? L 
SfEEIi? 5fi 
■*SPEE[HMG* 
flDT CftUOHT 

^oim ^EiTH nr4 REjAir It le 

.JUl^ClTEaN: ROAD « 1 9 ^ H J 
FPRUflRBt Lffr, IIIOHT BR U-TtJRH^ F 
bPE£.B? 45 

r 

GCIHG SDIJTK Ip RflflD B If 

JUN^nSN: ROAD 41 10 3 14 

F&RllAfilfp LEFTt JfrflHT ac l-TlPR*f* L 

+JPEEII+ I BARE TDD *5PEEIi+ I DARE tDU 

arEEDT IflO 

:t5PEEDirfB:t 

HOI CAUbHT 

GOING EAST AN SDAU tt ^ 

TQU p|flB£ JT ro jifiiiPiHfla HOUSEi mm 1 1 

*SE£ 701** 




Hit 


1501] 


FOR A^t TG B 






1SB0 If LeFTt£I*,11=*F- THEN 2OB0 


ID PRJriT TiqBCZ^);-HHHAB" 


15tD 


PiA^(J=FHACNJ 






TB^O [f LEFT*C I* f1 ]■*'«■ ^HEN 1975 


2D PRlJir TABC?OJr[:flEH-f[VG conpUTiw 


152U 


F[*l^2^■FBACC[Flflp^]J^ 






19U0 IF E,EFTta*^15-"L■ THEN 19?ft 


ji: ?fr]tfT TAEineh;"HflnRiBTOU?ip weu jerset* 


1530 


irEJiT A 






1910 Ef LEFTltHp1J»^ll"" THEF* 1?50 


1=^1} DIH K1C.]DMli2p23pRClDp3D^EI3D»30>^FEB,2>^CC3Ql 


t540 


AEA LRAC HILXNARF NAnORfB LODGE 




192D RZn BGBFE3 


1170 &Ji^ ll[3IJ3 


T350 


8-1 






1?3fl PfLirtT" -^^^rilU GGDFED:**" 


1130 BIft MiCJCh 


15&0 


J=0 






1?40 GBTO le^O 


TITO k^n bO^UB filJLES 


11?0 


[ = 1 






ItSO I-lfl 


isuo easuB J3^o 


1580 


RER DOSUB CHftl! 






tf£0 SBTD ^«49Q 


1210 REH RAtiUDH HUISBER!^ 


1&?0 


GGStJB 2520 






T9?p l^UcfiJO 


1220 Il£F f«Pia?=J«r^flNlPnJ*J<?-tl 


IfiO^ 


REtl EG^UD rELEQRAn 






1f90 BGTG 2^00 


1230 KEn 1 13F- f^DALlS 


Iritfl 


GOSlJt 2570 






1990 [■-1+ULR}t:I 


1240 REAB ^ 


liiO l!£i1 ADEi IMCREHENT 






2D00 FAR A=1 TO l^tt? 


1250 FDR R = 1 Til H 


1430 


J■J^-2 






2Plil [f RfC,flr=ft THEH ?04D 


I2i0 REfl I! OF INTERSEC 


1^40 


RErt NEED HEPAIB' 






;d2(i next h 


1270 REAB C 


U50 


IF F*lftMC^ = 1 THE* 2?40 






2030 siraa 4210 


1280 tSfr?=AB5(B5 


U4D 


RE A PE^D EMB? 






J»40 ft=C 


12?8 ^r Q<0 FKEri 1320 


1470 


IF JJCIR) QR J-1 THEH 30i(l 






34) l> J- A 


1300 Uffi?^3 


i^eo 


REH DEREGTIDN 






2*iO REfl ffflPE^ 


UTO QOTD 1^30 


1A?0 


IF I±-1 THEH 1?M 






20r0 IF F«flUJ"l THEN 33SQ 


1J20 U(RJ"-1 


1?0fl 


H^EcRpJJ 






IJVBO REK SPEEIi 


1330 KEH [iIREC, AOAH 


1710 


flOYO 1730 






^flTC PS[«T."Sf£EB-; 


1i40 fOS J-l TD C(ft) 


i^ao r-^-EfRrJ* 






21I>{| IMPUT & 


1350 READ Etlt^J»^R(ff,J^ 


1730 


REM l?QPi]? rtACS&TNG 






?|l^ REn DANGER0U3ITY CfiASH CHECH 


UAO KEXI J 


1?flO 


C^fite^J) 






212D If 3>101" THt« 31?ii 


1370 HFXT R 


1750 


REH SKIP LJME 






213D IF 5<30 THEN 3720 


13B0 REJ^ frAflf 


WiO 


PRINT 






^140 REfl ILLEGAL^ 


:3?0 PILIEIT "UHAT IS TOUR JWftE^'J 


17?0 


REI^ DG5U1I «IilJ)EC, GClflD ON^ 


PSIHI 




2150 IF S>33 THEH 30?0 


lOO t«PU7 H4 


1?S0 


OQBUB 2690 






2140 flEfl DRUIfK DREUERS BRIVE- 


1410 EEfl BPEIIINB SEflTtHEHT 


1??CI 


REM D! C]P:%J1MA^f 






2l?0 foil ft = a TO 2 


HJO PRI«T 


IDOQ 


3F H1=R AHD Elf R,Jl^fi1H1 pH2? 


TKEN 


2GB0 


2]flO IF Bifl^U'-fl THFtt ^^10 


H!0 PRIhJ "tGaGD LUCK** 


1»10 


[F H1-R1R,JJ A^B RiRIHKH2] 


IhfEN 


2330 


Sro B(Apn-F4IACM? 


1 IflC FTf Ji 5Rfl»^P1JL^ HOBSE 


1920 Rfn JyNfTIOil 






2200 BCA,2]'FJl/ittCirfA,ir>} 


t*50 Hl^FtfA^N] 


1530 


PRINT 'JU^CTIDH: fUAB »t";R; 


" i #^;C 


2310 NEKT fl 


H60 H2^P»fAli:iiHlM 


lE^C- 


REfl fl&K UHAT UAT TO :uRH 






2220 EEN HIT B"^ BBIWK IffiTUEK"' 


14:^0 REh BRj;Nt! IiRIVfPiS 


1850 


PRIMT "^tlJ[UARIl^ J_EFU RIGHI ^R U" 


-TURK"; 




14?(l REtl POLICE 


ISJO 


INPUT It 
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227D 

2^20 
2t50 



THEH 

THEB 



2?10 

2?HI 



2400 



2^3i> 
25fl0 

Z93Q 

25^0 
2550 
2SA0 

2581} 
21^15 
2i{iO 

26?ii 

:]^iO 
2i70 

^£01} 

2i?i: 

J J DO 
J?20 

2740 
2?£0 



FUR ft-i m 2 

IF DCfi,l?=0 TMEH 2270 

REJt 15 rfilVE-R CflllGKn 

FAR ft=1 TO 2 

IF SCftpU-e THM ^345 

FOR B^l TO B 

IV ^i«,lf-F(B.l> AflD BCft,2)=Ptl,3S THEH 

HES: £ 

nE^r A 

QK FNIlCJJ GOTLI 23S0,2iU0,2fl2a 

PRIHT -^I IflfiE TOU JO ^PteU ++ IDft^E^Vltr 

OOTO 24311 

PSEi^T ■'=tEP£ED[?HlJ* CS FUN CIdI? J30 ^TJ"" 

BOTH Z«i 

G0T3 ;^ts{i 

fi£h ePijruL EfluanT 

FRIKl -A LRWIK IPIVER HA^ SEEH CAUGHT, 

PRINT -ARftESTEl H[fl UILL BE lESriFTIHJl 

PfiINT "THf PE5f DF TJIt OJihE,^ 

fRlNT 
DLfl,l^"0:&;ftT2>=a:P(BJ>=02PlBt2)^^3 

^□TD 1^2(1 
R£Fi CHECTl 
FDR ft-=l ^Q 3 



THE FttLlCF^MIiH 
iiy i;Clt]RT FOR" 



tfHO" 



RCHltHI>^CF-CA,F?, 
AHI? BCI]I,H23 



^(flp2?? 



THEN 
Jitfrt 



LIUE AT Its CDRHElt- 

1 rjR4Hi,ti23;'iE<" 



GflliHMA' 



IF m^ptrtt^j flrti 

IF HarfitPfATl^P^^p^^^ 

flExT ft 

REIURH 

REH TELEG^iai ?fiIHT-UP 

rff3flT 

?RIHT "tfAft "^ttt;"," 

PRINT "Hl^t nRE IJ1IJ7 L 

FfiCNT "Of ROUD ■"SHI;" 

PiltiiT "CDMt fltf flfElrJ" 

PftSifT " 

PRINT ■ 

i^ftlNT -faElEeflMftA CITRP. 

FEiaT 

RtTimv 

HEPl *IETH?C. ROAD ITN* FfllHf-UP 

i'ft]Nr "coirtt ■; 

OH !■ ear CI 271O^a73l>p2750,2??0,?7^O.2a"-D,:?8a0»2S5O 

flOTO 2Qbl> 
PRINT ■:fEST**T 

GDTG 39iO 

PRINT ^"NaRTHEflST"; 

GSTC Iflfifl 

rfllitT "BBUIHEftlar"; 

GOTO 2M6t 

PRINT ^■NDRTHyE8T"i 

OflTQ 2ai? 



-iq4a 
1440 



3B10 

2q::^ 

2530 

2sqo 

2fi^0 
2B^0 
^fl72 
2J31> 
2S10 

291^ 
2?21] 
2?30 
2f^0 
2?50 
2^40 
a?7(l 
2^3 D 
3791} 
JOOO 
3t10 

3DI0 

3D4I> 
3050 
30^0 
Jli?0 
3aB0 

JSOfr 
3M0 

3120 
II 10 
31 fO 



fiRlLflflAa fPfllHT* 

-rao 4MDE IT TD GRfiflma 



KgUBEMinn i 



«n Toift Wt-' 



PSmr "SQUTHU£ST'"? 

GDTO 2BdO 

PRINT -tfl^r"; 

&OTQ 29£C 

PRINT "SODTH"; 

PSINT " ON RDAfl #"';R 

RETURN 

SlEH AT 

PRINT 

GOTO 324fl 

R£h DRUNt: HEl fflUR CfiR rPffiriT:* 

PFSttf "?:ER&PLflrT--GF:uriK JtRIUER 

SOTD 15^0 

HEJi Cftfi MtEDS f;j:[N& *PBI«T^IPt 

DN F«A<5J GDEO 2¥6fl ^^^00, 30(J0, JOIOh 3040 

P-^IijT "PJ1P...FL;iT TliE" 

GaTJl 3U5I! 

PBIKT "fLlf-^.TflUft CAR DID A SBHERSAIT'^ 

6DT0 3050 

PRINT -tQ^T GF 5^^^" 

GOTO 3ii5fl 

PR[*IT "SHUQSH.-.HJS FLATTENED tOUR CAR-' 

GOTO 3051^ 

FlflM ~fOP,..tUULDdG ftEE TOBI* TTfiE!" 

CDTO 33^0 

REH DErtB ENff PftlJIT 

PRINT "t:DEA[J £HUf 

GQTa 3JiD 

S£h SfEtDIffli 

PRINT ■+SfEECli*(j'*" 

KZn CAtlflMT BT WLICE' 

FOE ^^1 TIT 8 

EF Pil^llift flW» PCXp13"J THEN 3t70 

NtKT I 



3150 

^160 
3170 
TEQO 

3200 

3220 

3230 
J14fl 

325 D 

3270 
32?0 
33011 
JJIO 
3320 
3 ISA 
334 a 
5J:o 

3U& 
31B0 

33? 1} 
3400 
3410 

311^ 
3440 

3^t0 
3^7fl 

34?0 

3iUo 
351Q 
3520 

35^0 
35 ^{1 
3»iJ 
3579 

35^0 

3410 
362{l 
3&30 
3ii'> 
i«^0 
3441) 
34^0 
34 BO 
3£P0 
370 1> 

3eio 

3B20 
3B3a 
3»40 

3f50 
33^0 
3E70 
3BBQ 
3B?fl 
3t00 

3¥:o 

3f20 

3920 
3Tli3 
395fl 
3?il> 
3^70 
3¥flO 
3f°0 



HPCEDIKI] 3T THE POL ICE ^ 



rot} FB9T H 



IjOTD 21 bQ 
PBlItT "CAU6HT 

SOTO 32^0 

flEJl TDD FAST tCBASK* 

FRtNT ■■KEF5^QUSf^lIEE£E».t^PN^ 

GdID 424C 

REH HQAIU? 

fItSHr 

PRINT ~ftGAL«"; 

INPUT H 

IF lEFTtlI1f)l="f- THEH 1390 

REEf ELDS INK aTflT£ilE«T 

PfilNl 

PBiHT "*SEE TOU*" 

Ftri ft IDLEST 

PRirtT "SULES"; 

UfLJl It 

IF LEFT*fll,1?-"N" T«Erf 3V50 

tRfln^A [inftftli IS fl MICE QJ_Ii LJI0T UHG Hi1^ HUT OJITE" 
NABE Uf HER hlflB. UJlEfiE SHE yANTS TO Ll'^f-" 
5HE Hfia ItAfiROUED IT DO^JN TU J3UX!iJHt.ft£ iii SflK&OriZO CITT 
AND Oi^ fl STREET CORNER." 



PKINT ■ 

PEENT ■ 

PRTJfT ' 

^FclNT ■ 

FRIN = 

PRINT 

PfiINT 

FfrSill 

PRIli: 

MIM 

PRINT 

PSL^T 

PAIfl] 

PRINT 

PRINT 

PR[«T 

pSEflT 

PfE^JfE 

PRlrtT 

PRINT 

PRINT 

PRI^T 

fill ^ I 

PfllttT 

^RfNI 

PRINT 

PRINT 

PRir?I 

FrtlWT 

?PLriT 

pJtIMT 

PRIHT 

PRINT 

PfLlHT 

PAIHT 

PRINT 

PRINT 

PKINT 

PPlST 

PRIWT 

PftlN! 

PfflNT 

PREH3 

PfiENT 

RETURN 

fitn DATA 



ftr T[tE &£BlttN]JtQ, TWE MAILftAH S1VE5 TEBl A lElEGRAR tlkHTEIi 
ET SRAiirtfi TEUtNii TGif yj?ES£ SHE LIVES," 
tl HILL «EflD IT Ifl TOU}-" 



■fOU BET IBTO SOUR CAR 1"! 

"F^^Ori iHEEEEERt "TOU "jO TE 



LEfflC rflL^NARF NAhQREE LGMC 
GJrAflHA5 iJUOGt,- 



^'TOU IRT T 
'CRA55IL=F5* 
"TICKEIB"^ 
"F-.AT TIftEB" 
"RJNililW OiJT L!f CAS 
^HEAB EflOS" 



DET THCffE UITHOIIT;^ 



ttlEflf IS t\H 
QF GilRBON?D 



CITT, 



POLICE FORCE CHRIRCIJIG THE LiUE" 



TItERE ARE 

CITfi" 



2-DRI|hitS U^ THE UEFeEETS flK ftAHBOWU' 



"IF A PQLICEHAN CATCKS A DfflJNHp HE HAS TO" 

■TESTIFT m t^SUPT" 

-mtfJCH lAILES TRE REST OF THE 9H£)' 

'^IP A DRUttK BRIVER HltS VQU^ faii LCg^," 

"AT EfltH JUKCTlDHt I UILL TELL TOUl" 
^■THF TSIftMttlri VCU AKE liSlNO" 
"THE flOAD rau flPS a«"^ 
■THE ROW CM5SIHG" 



I y[LE, ASK 1"BUi'^ 
THE l?AJ TfjM UhNT 
5rEtD iil rlPHI" 



TQ TifRrl (JE LEFT)" 



'AN mRPA^S IE JJGT 4 
'ilEEELV 5KlPP£fl OVER* 

"•ItfAT IS ALL*" 



LINE!^ 



JUNCTION^ 5E! !T IB" 
IT IS ilNAJtNL^UatED.- 



J102C 
403t 
4*10 
4ii50 

^l|7D 

4oao 

40? 
4^1}0 

^llo 

AI^O 
^t3fl 
^^41} 

4140 
4210 

Ok 



EtftTft 

Pi^Tfl 

DATA 

UfiTA 

HliTA 

Ilk]A 

BATA 

Bi^TA 

DATA 

DATIi 

LATA 

E^IA 

&ATft 

DATA 

]IA1A 

BATA 

DAEA 

BAT A 

BATA 

BAT;; 

EN[» 



ie 
-arH,2Te,4r3.5Taf^^^T?TBTape,?pBTi<) 

J,7,l/HM3H7pt 
2,7,1?r7,ta 

s,^Tep?,l1r^1 

7Hflfa,Si?*?,l0f?^1B*7JU7,I|l|4 

-Z,7pl^7,5 

2r7p]p?p1t 

a,7,14,7,l5.7t^p7tt4,7,13,7,1»?,12,7,t1 

ei7,t4r7^15r7r5.7j4T7Tt3,7Tl|?iia>7T^1 

a,-'r1ir\l^^?r5H7.H,?,^"lp?rlT7tl2T7.n 

-7^4,4,1^5,*, ^^7,ftpflpa,■^,e^tfl 



3,&.^ 



£,10 



■3^S 
-3,at8,S,?^B,10 

-3rafa.Bt?»flpiij 

-3rBrar3r5fG,10 
-3,B,S,flrT,gp]0 
-2iBp?pBpJ 
-5,6,2,8,3,Br*pa,S,^4 

?,Q,Vp<ltOtQi» 
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Not one 



The game. Not One^ sometimes 
known as Pig, is played with iwo 
playersandapairof dice. Thereareten 
rounds in Ihe game; ore round con- 
sJsimg of one turn for each ple/er. 
Players add Ihe score that they attain 
on each round and the player with the 
highesi acore after ten rounds is the 
winner 

On each turn, The player may roll Ihe 
two dice from one to as many hmes as 
he wishes. Hthelofalof thediceoneny 
rol I afte r Ih e f i rsl equals the tola t sh own 
on the first roil, his score is then zero 
for that entire turn and the dice pass to 
Ihe olher player On Ihe other hand, if 
the total on hia dice is anything 



different from the total on the first furn^ 
he continues lo roll and adds the totals 
of the dFce to his score. After each 
successful roll, the player can decide 
whether to roll again orstop and score 
Ihe number of points already obtained. 

You'll find that the computer plays a 
surprisingly good game of Not One- To 
beat it you'll need some knowfedgeof 
probabilities and a little bit of luck on 
your side. 

Not One was written In response to a 
challenge that appeared in the charter 
issue of Creative Computing, The 
game was wriUen by Robert Puopolo 
and first appeared in Creative Com- 
puting, Mar/Apr 1975. 



i 

RDLJ. AdAtH 

II 
ASLL fiBi=iIfl 

■1 

RfllL liOAIN 



CDIfPUtESI^B 
CUhfUTER'S 



^ rES 

■T TES 

7 ^E5 

^ HO 



ROLL I [ 

ROLL 2 : 

l^dLL i t 

ROIL ^ : 

FtflLL 5 I 

RJILL i t 



COrtPUTEJri ii 




<^H 



nOFEtlETOVri lEU JECSET 



.tQULt TDV LIKE TH£ Itf^TSfUCTJONS? 'Tf.S 

TI^E GAtiE \>F NQTQME It PLATEH U]TH 

TW^ FLArCA^ AMD A PAiF. DF .-ICf. 1H£Rb d^S^ 

TEh RDOHII? iPc THE EAhE ONE ROUNi} CO H5 iST TtJl? 

y &r^E TaRN FOI: EflCH ^t^rt^EFL, FLflTEES 

'■'MH^^LT AHb THE C^h^^'^^F^h ADIi THE SCDRf 

THEV flTTflEpi OH e^CM RO^JM^ AflFi THE PLATEf 

l^jj|< Th^ Nl^nC^I it6Hi AFTEfi I^M HQU^PS ]5 ?HE UINN£R 



[iJl ^flCH TUKN THE ^^ftrEfi *iAT ftQLL TH£ lUj 

tJt£ fft-Jr. 1 Til ^ Ijft^^H If T^ :S eHE TtTTfiL Of DItf ON 

TJi= ITH RilLL. 1=--Lft ^Mi PLftrfRE SCDRi FOFi THE TUSN IS 

i««D HERE S THE CATCMp If AH^ TfT^ IE ESUAL 7[> rc|} TNEA 
THE TUR»f ]& OVEfl AND UTS 5CRRE FAR TNi^l K?>'J^C IS ciRO 
■^FTEF Ea:^ RJlLc THAT DIJESr^^T LCUAL TC^}^ TH£ PlAUR HAN 
PED1?= I^HETHER TO (TOLL ASAIIV OR JTli* ".^l 
StDSLE ThIE NUftPEIr CF PttEi*TS ftLITEi^ffT l]BTA]ri£Ei. 



ROLL AG Alii -f f^ 

? 

TDU AET A ZERQ F'Dfl THIS RnUtiD 

CDIFllTER-'S ITDLL 1 : ? 

CDftPl^TEE^S HQU. 2 ; S 

CDtlPUTEfl^S R3LJ. 3 I II 

COftPJITER^S RULL 4 ± 13 

j:i]ftl^UT£R'i RajJ_ 5 : B 

Gi^Af-J^IEH'E kJlLL 5 : 3 



COrtPUTEft: 


U 
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RDU^P ? 






b -3 
















^DLL 
nOLL 


A&ALK T 


tet 


A[>AIN 


^ 


IFS 


4 








ROLL 


ABA 111 


T 


7E3 


7 








RDJ.L 


AGAli 


t 


■^s 


10 








RDLL 


AiJl^]H 


T 


1E9 


7 









TDUl 



ROLL AiiAlR 
i 



? 1"S £S 



^ TES 



tl|JlPEJTEt^5 
CtlMPUTER-'S 
COHPiJTEt-'S 
tPKFlTEE 5 
CDM^JTEC'3 
COftPEJTES'E 



CJlftPyTERS flOk'£ 

iTQLi 1 I S 

ROLt ? : 7 

ROLL S ; 3 

R^LL 4 r 6 

RkiLL ^ : 4 

RDU i I ? 



CDRPUtEfli 121 



TDU: 



n 

RDLL AG A EH 

3 
RDL.L ASAIH 

t? 
RDLL Ai^Aift 

3 
RDLL AflAIM 

RDLL AGAIfr 

7 
RDLL AGAIfl 

RDLJ. AEAltf 

1? 
ftOLL AEAIH 



CaJIFtJTER-'E 
CfUlPHTER-'S 
CGJiPlJTE^-'S 
CDHFUTES-S 
niJtt^l^IEt^E 
CONPl^TEK'S 
C&hPUTER'S 
ClJrtPi;1£R'S 
CDrtr'L^T^Fr-'S 



? TES 

'7 TES 

T TES 

? TES 

^ TES 

'7 TE5 

' TEa 

CDWUTER? fliK'E 

RDLL 1 : 5 

PDU 2 E V 

RGLJ_ J : 12 

ftfUL ^ : 8 

ADLL ^ : 7 

RDlt 4 ; 4 

RCLL "■ : i 

RCILL B : n 

ROLL ? = i 



E[WPllTEIri Iff? 



rDUL 1 



RDU*id A 

IT 
RD-L AOAIM 

7 
RdLt ASA] IF 

a 



T TES 
^ TES 



1T5 



RftLL *ein» ? TES 

? 
RBLL flUftrW -7 TES 

n 

^aa flET A JEftO FOR in IS flOUIH* 

COHPUTERfl riOV£ 

CBHPtlTER-^g Kttll 1 : H 

tOnPt^TEFL^S RDU 2 : 4 

CJlUPUTtR-'S FLDIL J J J 

i:iJnfUT£R^E frlllL ^ : ¥ 

CBHfUtEK^S ROLL 5 C 12 

C&eiPUTEfi^B ROLL i : i 



t^OLL AGAeM -? TEB 
5 

9 
ROLL AGAlil -^ IE5 

RIlLL flSAIIf T Tf3 

7 
ROLL liGAIN ^ lEfi 

)|J 
ftCLL ftUAlN "^ YES 

? 
JiDLL flCAII* -T TE5 
? 



YDlfl 1^2 



CDHPlTEflE NOUE 



^ChPU^ER-5 ROLL 3 t i 

CCn*UTER^S flDlL 3 : 5 

corih'urEfi-'s roll ^ t ? 

CflttPtlTEfi ^ ftflU 5 : B 

CCHPUTER^S KDLL A ; 4 

C[|[tPlJUR'& JLQLL 7 : 7 

CIIKFUSER-^S ROLL S t < 

CDMPUTER'S RflLL ? : * 

CQtiPLlTER^ 289 

RDlfMD 7 

A 
ITOLl AGAIN ? T£S 

II 



TOU; 22» 



KOLL liGfllN T TES 

YOJf GEl ri ^lRQ F^R this ROUND 

GOnPUTEItS lUVE 

CQdPlTEfi^S ROLL I r d 
CflftPbTER't EDLL 2 ; 3 
CimPUTLft'S RDLL 3 I 9 

CenfU-ItP-'S ROLL 5 1 ? 
CUBPUTEt'S ROLL i : 2 



3-46 



CDhPU1£R 
RUJNB B 

RITLJ. fl^i^IB T fEE 

YEU OCI fl IZEHl FUt TM3 RDUHS 

CQHPUIEfta flflVE 

CflHPUTBV'B M3LI 1 ; ^ 

CWPUTER'S RDLJ. 2 t 11 

ClfHPlflfcR-'? ROLL 3 : ID 

CDHPUTER-'S ROLL 4 : lU 

COnfUTHR-'S ROLL 3 : i 

CQHPLJTEG^S ROLL 6 : A 



TOUl 229 



DDHPlfTER: J74 
RIU AS6IH ? TE3 

a 

ROLL ASAIif '? TES 

7 
tiOlL AOAIK ^ VEB 

12 
RDLL AftAIti T YES 

2 
R9LL ^Mi\i » YES 

7 
ROLL ADAIM ^ |e3 

5 
HOIL HGAI*I -7 TES 

fl 
ROLL »flAIB ^ TES 

HttLL i^BAIN * tE5 

KOLL hljAlN -7 TES 

5 
i^OLL AQ4IM 7 TES 



YilU: S2» 



rtULL iUAIh ^ YEJ 

ROLL AIJi^lM "^ VES 

riDU AGAIN T NO 

CUnFUFERS JIO"^ 

CnPlf-UlEE-'S ROLL 1 i fi 
CDHPUTER-'S RDLL 2 : B 
THf CDHPUTER GETS fl iEftO FOR THE TORFfi 



COflPUTEfl? 37d 



YOk^: 324 



7 
RBLL A&AIN t tES 

LO 
KOLL ACAJN '7 TBS 

RUL AOAIh 7 TES 

7 
TBI! &ET ^ ZERO FOR tHl3 flOUNJ? 

CBBPUTEHE *IOV£ 

eOFIPtlTER^S RflLL I : 6 

COflPOTER^S RJILL : : 11 

CDIIPOTEfi'S RDLL 3 : U 

COItPOrEH'S RDLL A i 9 

DO »P UTERES RDLL ^ = 3 

CJlrtPDTER'5 tQLL i : 6 

TttE DDttPOTER EETl A ?£R0 FDR THE lURIJi 



COnPUTER: 37d 
SOORINEa SlJflffAET 



J^0UU& 

2 
3 
4 
3 

7 


? 
10 

lOTALSt 

OK 





TOUf ilA 


11 


CJfMPUTER 


t 


46 


t9 


40 


21 


35 


40 


61 


c 


43 


57 


37 





37 





50 


n 


t 



374 



37^ 



LJST 



[ NETS UCT JONS"! AS 



J PRIRT TA?C^i3r''*iOTONE":?RIifT 

S PRJKT TABC?03;'CREiITI";E C&pPunNO" 

i PRINT 7flBU?3;"*l9RRS3T0uN N£U JERBEf* 

7 PRIIfT:PS[iir:PRIJtT 

10 IiIR TC50l,Rllfl^J:nO^Lt12S 

15 IriPOT "U11UL& TDU LIKE THE 

in IF A»^"TES" TREN 33 

25 IF Af»"HC- THEN i;fl 

iS PRIJITiPRIilT "AN3UEB ^EH 0R RHi ■ ":PP(NT-GDrn 15 

35 PRllfTlPPIhT "THE fiAME DF BOTQtfE IS PLflTEB UIT«" 

40 PRIRI 'TLifl PLi=iT£RS AHIi A Ffl[R Of LICE. THERt ARE" 

43 PRIHT *1E** RDUEJCpS IN TKE GflPE QnE RDONS CON&aSTlHQ" 

iS PRINT *DF DNE TURft fUfi EACH PLATES. FLrtTtKS" 

iS fRlNT NTDURStLF AMD THE CnHPUFERJ ADB THE SCURE" 

6( PRINT "THET ATTA]N UN EADH ROUH&, AHB THE PLATEH" 

A2 PRINT "tflTH tJlE JtlBHE&T SCDRl HFTER TEW RflUNDS 15 EHE U!HJ«£R-=i*RIflT 

67 PflLNT "Gil -ftCH ^OR^ iRE PJ-AVER HflY tOLL THE TUO" 

i? pt.fjT "iiiCE ^ROfl 1 T2 ^ TIMES. SF Fl IS THE rOfflL OF ITCE ON" 

?2 PR[ilT "TJtE LIH flOlLp TKEtl THE PLftltRS SCORE FOfl THE JURN IS' 

75 P[i:«T ^TMhfTC2l*T(3ft, *T(N>- HDUPJER^'^ 

7? PRIJIT '^fiMD HERE-'E THE CATCH ^ IF ANY TCI) 15 EOl^AL TO m 5 THEN' 

ai fRiNi MH£ IDRN 35 QVEfl AND HIS SCDRt FDfi IMfiF ROUND IS If-RQ" 

32 FRIffT -fiFTEfi EADH ROLt THftT DDESN-'T EQEJAL Ttl/^ THE PLAYER CAN" 

Se PRINT "DECIDE l^HtTHER TO RDLL flQi^lN OR STOf AHIi " 

?0 FHTNT "SCORt THE NDMER OF P0IHT3 ALREAUT nSlfil*ttIf,- 

1^0 fOft r*l TO 1D:PRlll:PRINT "RUUBIl ■;T 

3111 i=j:*1;Rl=HlTf*tRN&nSH-1 

115 ffZ"Ii1t(i*RNIiCUiM SPRINT RHP2 

1?0 IF IJI THEN 131} 

125 T(1?^Rltp:;fiDT0 135 

130 TlK^^RI^fi? 

131 IF T^nOTlSJ THEN 135 

132 FftlllT "TOU fiET k ZERO FOR THiS RflUKD" 



133 1il>|T1-0:GDTD 200 

135 TI^TItTcn 

t4« IftPUI "ROLL AffAlK "*{&» 

145 IF B»""T£S* T^Ert 110 

T50 IF fl*="NJl- THtN R( F J^f 1 :y = 0;T^ =0: FUR A = l TO 3P :T CA ?=^:HE>:T iflflTO 300 

liC PRIilTiPRIHT -flNgueil VES Dt ND"":fRINTt flOTD 140 

2(0 FRtlfTiPRCNT TuPn 5 h ; "COfiPlJTERS HQ";E" :Pfi3i*T 

2M RESTORE 

2D2 R1 = IHTCdPBHBOI)flER2=INTCd*RNDn>)^1 

aUfl FOR D = 2 TO fil^fi2:REfl[J H D? : KtX F :n=Rl +R2 

^05 ffl* C^l TQ LFli^slF C = l TilEH 215 

210 B1"[«Ttt*RNDCn? + l:R;J=)Hlti'RNIiLnHt 

315 FfflrtT "CiinPurER^& f:DLL'i:":":fc^1tR2 

^^0 IF C^l THEN 2J0 

22S TCIJ^I:HR2:S0TD 24? 

2311 TCC^'*!r*R3 

2^^ IF TtJUOTCn GOTtI lO 

234 PRIHT *TK£ C:0HP13T£R GETS A JERD FDR THE TORNLr' 

2J7 Tli'OlDDTD 245 

2^2 T]=TH-T(i:i:NElT C 

345 C(T) = Tl?T|pa:): = 

210 C2^C2fE(TF:C1=C1-fR<T> 

J5J PRINTiFDR S = 1 TO 50 iTIBl^O^ Htit 

255 IF T=IO TfiEtt Pft3J*T "FINAL &C:ORE":P«I«T 

2iCi IF C^-^CI THEN 270 

2i3 PRl*fT-qDJlpijr£Ht ";C^^"TDU: "pOliSOTJ SOO 

2?0 fRJ*I "TOU: *;i:i j'CDhPUTEIli ^iCJ 

3ii<f ne:^t t 

Jfl5 DATA iejS,?T?,J,ci,4H9i'^fiaflS 

310 pRiNiiPSiNT "iCDRiHO aunnA['T';PRIN F 

315 Pftlh^I *flD0JfIi"rTASn5J;"T0LI-;TABC25);'J:0P*PtFE*"1?RIHT 

32D FOR E::l TO lOiFffllfT E; TAB [ 3 i ) T Fc^ 5 ; TAB(?4>;CCE>;t*IT 

3^^ PEJNT:PRIilI "TUTALSi ";TABn Ai;E:1 ;Tj^£C2iJfC3lPH1MT 

ax 
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Obstacle 



The game OBSTACLE is an obstacfe 
course garne playecl on a 9)t40 grid 

A car IS represented by Ihe characler 
'*\ the obstacles are the wafis 
(represented by exclamation points 
and hyphens) and spaces are where 
(he car may travel. The car may not 
pass over or occupy a wafi orobslacle. 
The character S' at the upper left 
corner, indicates where the car starts 
Irom. and the characler m the lower 
right corner, the'F', Is the space the car 
must occupy at the finish to win If the 
caf tries to occupy or pass through a 
Lvall rhe game is lest When the car 
lands on the space occupied by the 
character T\ the car has finished the 
course, and the game Is over, and a 
lime is calculated. 

Line- by-Jinep here's how the program 
works: 

Line6lO dimensions the matrix M for 
15 rows by 50 cclumns {aflowing an 
adequate margtn for modlflcatlon). 

Llne 620-680 Initializes all necessary 
variables- 

Line 700-730. through the use of a 
random number generatoTn generates 
Ihe obstacle course, where I is the row 
matrix index and J is the column matrix 
index and Rl Is the random number 
Line 720 generates a random number 
between and 1, multiplies It by a 
density of 1.2 (to increase density 
factor by a few decimal points) and 
removes everything rig hi of Ihe 
decimal point. Rl Is now either or 1 If 
it Is the matnx memory location W 
(I, J) Inside the For-Next Loop is 
assigned the value of a space, II It Is 1, If 
fs assigned the value of an exclamation 
polnt- 

Unes 840 and 850 assjgn the walls to 
Ihe course- 
Line 890 slores the values ol I and J 
info K and L, these act as value holders. 
After the print routine has been ex- 
ecuted, I and J are reassigned their oid 
values stored in K and L at line 970. 

Lines 910-960, through use of a For- 
Next Loop [as In the Initialization 
course set up routlnejn pnnt out the 
characters represented hy values in 
malrix M, LIneQSO, theCHR$ Function 
turns The val ues of the memory location 
into their ASCII character equFva'enL 

Line 990 checks If the car has moved 
yet. by checking Dl. If D|>0 then It 
skips the query option and continues 
wrth the main body If Dr^O then it 
executes the option query, asking 
whethera new course, orthiscoursecr 
end the game and then executes the 
respective option. 

Lfne 1130 checks if Dl Is not equal to 
1 and If so continues with the move- 



nw 



v>*^ 



assTAaE 



BC TfflJ UAIT IVSTItlJCTlDt?^ TE^ 
T« OJJECT Df IHIS &AHE IS TO BflUE TOUR i:*R'"t^ 
liGIHIITMG liT'B' A^E flft^iISflTE mOUWi THE 0B31*C1-ES 

'■'t'-' MLIS IB THE SPACE HMKEEt 'f^ Vai* HUST iMt 
Dl THt fifACE HARKEI 'F^ Qil THE EK«T BnOlfHT DF SPACES 
THERE P^if HD HIAGDNflL miVtB. 
THERE Mt tID frlflHT TD LEFT WWH- 
DlfLECTTDH? HC*t IS If P. 
DIRECtlQM ttQ.2 IS LfFT TD RIQttt 

DtREi^TiDM m^i li DDim, 

SFEiB IS THE MO. BF 5PflCE5 Ttt A OlVfN BIttCTJOH 



ment routine- IT notthenitstarJsJhecar 
at matrrx posrtion 3,2 and contlrrues 
with the movement routine 

Line 1030 Starts the mam program 
body, 1100 queries the direction and 
1110 checks the Input D if it is a valid 
direction. Line 1130 inputs the speed 
'S' and Line 1130 Initializes the 
counters Si and Dl Lines 1160-1130 
direct control lo the proper movement 
routine (1 is up. 2 is right to left, 3 is 
down)- 

Line 1190-1220 is the movement 
routine for direction 1 . Line 1 1 90 erases 
the car fn^m the previous position 
keeping track of I and J. Line 1200 and 
1210 check each character position 
between matrix position I, J, and l-SJ 
for a wall (exclamation or hyphen): If 
one Is encountered thegame Is over If 
no walls are encounieredr the move Is 
legal and Line 1220 assigns the carlo 
jTiarrix position M,J and jumps to 1310 
to check malrix position 10,41 if it 
contains a car. If so. the gaine is won 
and the End of Run routine isexecuted. 
If matrix posilion 10,41 is not occupied 
the game Is not over and control jumps 
to 870h the matrix prini routine. The 
Loop can only be exited by losing 
(crashing inro an obslacle) or by 
getting the car to matrix position 10,41 
where it executes the End of Run 
routine 

Line 13S0 calculates the time by 
dividing total number ot turns by rotal 
number of character spaces covered 
by the car and multiplies ir by IDO. Line 
1390 prints the time and Line 1400 and 
1410 query as to whether to play the 
game again. 

The program and these notes were 
written by Eric Ertckson. 
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Later in the f$un 
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LI[l£tTI(lB7 3 

ILLEGAL ncVGH*-..- YOlf lOaE 1 1 

DO TBU UI5H TD fLUV flSfllH"^ BQ 
1]K 



LIST 

tfl PfilNT TliSC2i>" OBSTACLE" 

2P FfrlHTTAS(2fl?"CR£flTIiJE CBMPirTJfG" 

31} PRIHTTHUB)"HflRRI5TB«Hr H£U sFERSEl' 

150 RErt ViqfilABLES USAfiE 

E£« " - — 

IfECIMfiL 
DEGIHAL 



7?i5 



140 
170 
ISO 
t^Cl 
2 DO 
310 
22i> 
230 
34CI 
25(1 

2?ft 
?BI} 
2?i> 
340 
310 
320 
3J1I 

3SI} 
3iD 
370 
390 
i»C 
4tO 

■4in 

4?|} 
430 

450 
4hC 
47il 
49(1 
4S1> 
500 

sio 

520 

5^& 
S30 
5J0 

570 
540 
S?0 
400 
d30 
J20 
^30 
i^O 
AN 
A^^ 
670 
dBO 
dfO 
700 
710 
7^C 
73CI 
7« 
730 
7jO 
770 
730 



UALUE 

mUF 

■lALUE 
VALUf 
Vj^LI^E 
VALUE 



FOR 
FOR 

roH 

FDR 
TOP 



THE 
THE 

-fUE 
THE 
THE 
THE 



CHARftCTEfl' 
CHiWACTen 
CHAR AD TEH 

{:iiAnA[:TEn 

CHARACTER 
DilAftACTEft 



lEGinAL 
■FCTttllL 

DECIHAL 

IiIRECTCOH 

TOTAL HD, OF TURNS TAKEN 

tOl^ HATIIi:^ 

CQLUW HflTfllX IHIEX 

PLACE HflLDEff FOR THE 

PLACE }IOLOEA FOI! THE 

MflTHIi: "JAICIILE 

[ItPUT TD TE^"HQ SLIEST JONS 

EAMBDfl KUBMP tEKERAiSR UftSlflM-E 

tPEcn 

TOTAL 9PEE0 CDUNTER 
'UPC-' fiATlfl lOWSU^lOO 

SIARI PflOaSAIl 



VARIABLE I 
VAAIABL^ J 



INGTBUCTIQM5 



KEPI 111 

(EM A2 
I! EH A3 
HEtl A 4 

REA A3 

RFK A£ 

REN 

R£n II 

ITEn E 

KEH J 

REfl K 

REit L 

REH tt 

REN #1 

REM RI 

REH 5 

PEH SI 

ftEtl T 

fiEti 

REN 

REN 

REN 

KEN 

A EH 

PRIHT 

PRINT 

PRINT 

FftlNI 

PftINT '^DO ^QU UAtif ]J*STIlLJ[:TIDH3";:JflPlJT HI 

If ««>"TE5- THEN 410 

pK5ftT"T^E 1?IiJECT DF THIS GANE IS TO 

PRIRT'' BEGINNittG ftT'S^ AMU HAyi&ATE 

PRINT"'"T-^ 1*ALLS Tfl THE SPRCE ftAEKEO 'F 

PRIHT-OH THE SPACE NAMED ^F^ ON THE EKACT 

PHIHT*THERE AHE HQ EEAQOHAL NOVES." 

PPiHT-THERE ARE HD RIOHT TQ LEFT flWES-'^ 

PRIttf^QlRECTlONS MD.1 It IJP*^ 

PRT«T '^DIRECTlflH H0.3 I5 LEFT TQ RIBflT*^ 

fRIJtT-DIREClIOii NO. 3 IS SOWN." 

PRINT 

PRINT'gPEED !S THE HD. OF SPACES IH A 6IVEH IHRECTIOIf 

REH 

REH [NITIALATIQH 

REN 

Bin HMS^SC? 

AlEASCt"*^] 

A?=A5C(""*I 

A^^ASCr' ■) 

A4<AS£rfl') 

ft5«flScr"F'^ 

A4=-ASCr^-"> 

B1^0l31>0 

REH «* NOTE ■ COURSE SET UP ROUTINE 

FM? >1 TO 10 
FffR J-t TQ « 
H=INTIP«M)»1,2) 
IF R1=0 THEN 740 

GBTG 770 

HCIpJI=A3 






ifflUE TOUR CAft^-*-^ 
THfcQUGH TftE GE9TACLES" 
p fDU HOST LAnD** 
flrtOUfll OF fiPACfS' 



eto 
a?o 

3J0 
350 



G70 



NEXT 
HEICT 



voo 

9!0 
930 
?40 

*50 
?40 
970 
?80 

Tie 

looo 

1010 
^0^0 
T030 
1040 
10S0 
1040 
1070 
lOAO 
lUfO 
1100 

mo 
1111 
iifn 

1130 
1140 
T150 

flSO 
11?0 
1180 
llfO 
1200 
1210 
L2I5 
1S30 
1230 
Ui6 
1750 
1259 
12A0 
1270 
1?Bil 
IJPO 
12^5 
130O 
1310 
1320 
1334 
T340 
1350 
1340 
13?0 
1300 
1)fO 
1400 
1110 
1420 



HC2p25M^ 

HM074n^A5 

M<2,3)'ftJ 

Hi3j2>=A3 

FOk 1-1 TQ 

FOR J=1 TD 

HEH 

REH 

REH 

PRIHT 
FOB 1^1 
Fflfr Jpl 



JO 
TO 



tflpttf Ttl >^A3ilf C 1+42 ^°fl2:NEXT 
42:H(I^J>kA4!ft[11 pJ?>iA4:NC;IT 

** FRIKTIHS RQUtlr^ *• 



II 

42 



PRINT CNNlCttapJI'; 

NEi^T J 

PfrfilT 

NEKT t 

I^:J="L 

CeN BS HOTE- HEU QDDRBE DPTIDR** 

IF D1>0 THEN TOSO 

PRINT-QPTID*! HA"CaHTIflUE,B-«ll COURSE pC=ST[]Pr; 

INPUT HI 

IF H1 = "A" l«EH loeo 

IF H1'-B" TttEH 4?0 

IF H4="C" TKER 1420 

PRINT'^INVALID OPTION' 

GDTD tOOO 

REN 

REH t4 HAIEf FROORAH BUftf •« 

REN 

PRJ#T*D[f1ECTIDN";f[N^UT DiH^lrfllABE^DJ^ 

If &« IHEd 1100 

If B>3 TNEH 1100 

FKlHTiPI![NT-5PEED' ;:[ilFUT 3(S = iHTtABS(S5) 

01>B]ir:SlES1tSs]f D109 THEN 11^0 

REH 4* tfQTE - CAR 3TAftTS AT POSJTIQjr 2jZ 

J=2 : 1^2 

IF B=1 THEN llfO 

If B=2 THEN tJ30 

IF B>3 THEN 1Z70 

flCIpJ)=A3:REH *» UIPES OUT PREVIOUS GHARACTEP 

FQfi C>l TO S[l"AB&U-1JilF Ha^Jl-A? THEN 1340 

IF NUpJ]iA4 JHEit 1340 

HEKT C 

HCIpJ5=A3 

FOB t-l TO S:J=-Jti;|F H<I^Jj=fl:THErt 114B 

LF H[lpJI=Afr 

HEJT C 

HCE,J]>A1[ OOnJ 1310 

H(1^J]^A3 

FOR C=t TG 5: I=cIt1:lF H(I,J}-A3 THEH T340 

IF HCltJ^-Ai ThfN 1340 

HEXT C 

BCV *-* HBTE - UietHIHS CHECK** 

If NM0^41K>A1 THEH S70 
OQrO 1340 

PRIHTnUFGAL HDVE TOU LOSE SOTO 1400 

REH 

REH ** EHO Of REH EDUTIHE 4t 

REH 

T=<Di/sntioo 

PRIHT ''TOO UBttM AHB TOUR TIflE IS ■';T 

PRINTiPRllfT'^hO YOU UISH TO PLAY AGAIN";:]HPDT ifS 

JF Hip "fES"' THEH 470 

ENO 



tt 



oaro 1310 

SsJ=-Jtl;|F H<I^Jj=fl:THErt 

THEH 1340 



Octrix 



fill*f 






TEflC^ Gfl*1E^¥ ITR f?J-7 ^ 

THIff IS rt GftHE Ci^LLEIi ttCTRI?:. EACH FLflTEP li DEALT 8 
CARfS eAheiNG FSDn ACE THROUGH EIGHT, THE CARDS ARE 
^UHKlb ACCHRDINS IQ fifrlUGE SUITS UITH ThE AC£ Qf CUJSS THE 
UlUEST AHIi THE tlSHT OF SFADE? HlfiHlSI. TM£ OBJECT IS TO 
UIH AS HA*IT OF THE EIOHT TRIC«3 A^ PBSSIBU, EACH TRICK 
PLftTEB BEIERflINE.5 THE Flflf fff TMf N£XT TRIfk. IF THE t^IBH 

Attb LQll CAFrHS PLArED flATJTH CQIDR THE HLO TRICK HILL EE 
HIGJI AM5 IF THET lid HOT flAtCH IT yJLL K LOHh IT IS [M- 
PURTftHT Tff SfT STRfliEBT TO l?Ji< COHSt CU T I vrt TP]CK$ FU THAT 

SCOfllHfi IS 1 rOINT PER TfiECKj * FDR TWO Ifl A ROH,? FDfi 3p UP 
ID M FQR AU EIGHT. 

RESPflHS TO THE IttPUT PKOHPT JTTH THE CAFtB YDD UAHT TO 
PLAT IH A TUD CHAKftCTER FOSHflT HITH THU V^^LUEifl-fl? *iS THE 
FIRST CHARAJlTEIIr ltl!li StJIT^E ^ DtH^53 AS THE SICOHEi J^iARj^QIER* 

CTI> SEE THE flEKAIMLItO CaItES, E^tEfl A^P^ JH 

PE^POHSi TD THE 'UHAT [aHD^ UUiR^y 



THAT-'S ITp ODOD LUC*!!! 

tlQtf IWPT POINTS fO EHTKT OEVES STftHIiftRD 68?^ q 
tlUU ttAWT PIATERS? 3 
fIfTEff PLA^ER-'J ttAHE' JEFF 
ElfTEfr PLflTER-'S ttftHE^ BRUC£ 
EKTfJ^ PLA^ER^S MHC^ ETE^ 
SKOdiD I ^^AT TOa^T Cffi H?» T 
JEFF'S HAHD 
CLB II Ij^ HRT ^n CLB 
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ir3 

IE4 
"!7 

lee 



HtUCE' 

SI A 



HAHIi 
HRT 



SPIf 



CLI 



This is a card game 1or up to tour 
players, or three players plus Ihe 
computer. A deck of 32 cards is used 
wfth ace through eight In each of the 
four suits. All 32 of the cards are dealt 
out at the beginning of the garne^ eight 
to each player. On each hand, each 
player discards one card depending on 
the rufes of the game {see the rules at 
the beginning of the sample game) 
either the high card discard or Ihe low 
card discard win& that inck. After eight 
tricks a new hand is dealt and play 
proceeds as before. Perhaps the 
easiest way to learn Octrix is to play a 
lew games with you and the computer 
or with several people and the com- 
puter Observe what happens and 
before long you'll be able to work out a 
reasonable strategy for playing the 
game. 

Octrix was written by Rogers 
Hamllton. 
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COMPUTER ^^ HAHU 
CLB UlA KPT SPD 



CARDp BRLiCE 
CARflp STEi'E 



TRtEK n 1 CHietl CARH UiitS} 

UHAT CARD, JEFf 

■lit 

UHAT CARPh BRUCE 

■III 

U^AT CARD, STEI^E 

mi 

JEFF PLATED THE EIGHT QF SPABES 
BRUCE PlATEii IHE f I If OF CLUBS 
SIEVE PLATEH THE FI^E QF DlflHMDS 
J PLU^E^ THE Blic DF HfJ^TS 
JEFf yo»f TBlCk I 1 

TRKK 41 2 {HIGK CARD iJTHS} 

If HAT CARUt JEFf 

■W 

UHi^T 

■in 

UHAT 
■III 

JEFF PLATO THE Fl"^ flf SPflBES 
BRUCt PL ATE & THE TUB DF SPAHES 
ST£y£ PLATEB THE FOUR OF SPa^PES 
] fLl^TED THE U^HT DF DIAH[}HBS 

I uojf T?u>r M ; 

TRICh 41 Z tLDU JIAED UltiS^ 

VUAT CARP J JEFF 

tilt 

UHAT tARD, BfiUC£ 

lilt 

UHAT CaRUh sieve 

IW 

JEFF PLATEJJ THE fOUft Of ELUBS 

BRUCE PLATEB THE ^U OF CLU^S 

STEVE PLATtB THE SIX OF SPACES 

1 PLi^tEU THE AGE QF CLUBS 

I UOH TAICK 41 Z 

TRICK i 4 CHI6H CAPD i^IHS? 

UHAT CARB^ JEFF 

tm 
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JEFF PL*T£D TUF SlI Of IrLAHDUDS 

BRUCE ^LAICD THE ElSltl OF HEiRT? 

STEVt PLATED IHE FDJP Of IIEAIflS 

I PliHED IHE Five DF HEARTS 

etaCl JDK TBICK t < 

TUCK ■ a (HlflH CflPC um5) 

UllfiT CfiRDT JEFF 
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UHAT CARD, 


STEVE 

























UHAI catto, tUiCl 
tin 

UWT CDRD, STEVE 

■Ml 

JEFF PLATED THE SEUEH OF tLUBS 

BfUCE PLATE I THE SEVEN DF HEArS 

STEVE PLA1EI THE ilfiUT OF CLUBS 

I FL*Ytn THE FOUB OF DIflniJHD5 

STEVE IICH THICK I 5 

TtlCr I t ILOU Cj^hd i»ihs> 

UIHT CflRH. JEFF 

llti 

UrtAl 



JEFF PIAIED THE TllO OF Bl^nORtS 
BrVCE FLATEI THE fiCE OF I^lrkKaUDS 
STEVE PLATE i TMt SEVEH OF SPSBE5 
I FLATEi rH€ TH(l£E OF ])EAnatfllS 
BtUCE UOH TffTCK I 7 
JEFF PIAYEH THE fiCE OF SP*IlfS 
BflUCE PLATED THE SEVEW OF DIAnEHIH 
9TEVE nAIFD THE THO OF CLUBB 
1 FLAT ED THE THREE OF HEABTS 

jEFf tfOif iihi:k I a 

TlfT HMD JEFf a&WElt ? PDlHtS FDR A 1 TOTAt 
BIIIHE SCUKO 2 POINTS FOR A 2 TGTflL 
STEVE ^COlfEl * rOlHTS FOi 
1 9C0R:ED * PCEHTS FflF A 4 
JEFF'S HMB 



A 4 TOTAL 
TOTAL 



CIS 



HRT SPD 



CLE 



CARD, BflUCE 



UHAT CARD, SIEVE 

■lU 

JEFF PLATED THE TUO OF HEARTS 

8IIJCE PLATE & THE THREE DF CLIfiS 

STEVf PLAIEO THE 4EE DF HEARTS 

1 PL ATE B THE TRffEE OF SPADES 

^I^VE IIDIf TRIGK I i 

TRlCr ■ 7 ILQD CARB UINS> 

UHAT CARD, JEFF 

IIH 
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•2 
II 

14 
IS 
lA 
17 
^9 
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HRT 
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1 113 
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1 1 h^ 
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I ^ h^ 




If 




H M7 


I* 


1 


1 lie 








ir MS 



Tirii:^; ■ i iirieH 

UHAT Zt^n, JEFF 



CARD HmSh 



UHAT CARD, 9tOCt 



UHAI CAirO. SIEVE 



JEFF PLATfH TBE SIX OF CLIW 
DfllfCE PLATE! TRE FDUIt OF SPADE9 
STEVf PLATED THE ELBHT OF SPADES 

I PLATED THE SIH BF SIAMHIS 
9IEVE IIOM tRlGK I ] 



Liar 



1 
? 

3 
5 

7 

10 
II 
4> 

30 
it 
7% 



TAB<?7)"0CTRII- 
TADI?l})"CR£flIlUE COPPUTIHO"' 
TiBriOl'HItPRTSlDUHf HEJ JEHSEf" 



PRTIIT 
PRIHt 
PfiIRT 
PRUT 
P(tlJ>T 

D1H ft(i3i,p(<,*i,ciiaiat,a«,ii>,Tt<7Z) 

DIP Htl?2},T[72l 

SF^TQRE 

FOB I'C T07 

RE4lD'r>1X> 

REIT I 

FOIt 131} 10 3 

READ Mm> 

' BA lA "AC E - , ■■ TW , -THREE '" , -FOLUt" t "Fl U£- . 'SJiC , 'SEVEH " , 
IfLlfl -cm IS ■ , ■ D I AHON &S ■ , ■ HEARTS ■ , " 5PAD E5 " 
FOR t't TO f 
REAB TtCJ!) 



IDO 
110 
179 
1» 

140 

lao 

140 
171} 
I BO 
1»0 
?90 
210 
2!0 
210 
340 
290 
240 
370 

2eo 

2?0 
JOO 

31 e 

320 



EIBHT- 



-ah 



■Vt'4" 



,H K 



0- "LOU- ■HIGH* 



i-' 



DAI 
MEXI 1 

PRIRr-TEACH GAHEtr OR ll> 

JifPDT « 

IF 7t<>-1- IHEif 3B0 

PIIIIIT- IH13 IS A QAIIE CAILEB OCTRLX. EACH PLATER 19 

PRIHTCABJS RI1H6IR6 FROM *CE THRQUBR EIBHT. THE C**DS 

PRIHT-RAIIKEB ACCOIllIHfl TO BRIIGE SUITS OlTH THE ACE OF 

PRIH-LQUEST AHB THE tlOHT Of SPflBES m&HCST. IHE 

PfilRT-UIH AS IIAHT Of THE CIOMI TRICKS AB PQSSIBU. 

PRIiri-PlAlEIl DEIERHIHES THE PUT DF THE *E<T 

FfflHT-BJfH LOU CARDS PLATEB HA TCP COL IIP 

P»[HT-HIGH AH» IF IHEI DO HOT PATCH IT 

PBIHT'POHIflHI TO SET STBAIEIY TO UIH 



DEALT 0- 
ARE- 

CLUBS THE- 
Q&JEET IS TO- 
EACH TRICK - 
THICK. IF THE HIGH 
THE HEUT TRlCIf UILL IE " 
HILL BE LOU, IT IS IH-- 
CaHSECUlLVE TRICKS IH THAT ' 



PGIHT-SCOHHO is 1 PDIHT per TKICK, 4 FOR TUO 1" A HOU.t FDR i, UP- 
PRIMT-Ta 44 FOR AIL EIQHT.- 

P»L»I- PESPOHO TO THE IHPUT PWHPT JlTH THE CABB 1GU UAlfT TB" 
PRIJII-FLAT IP A THO CHARACIEB FORPAl UITH THE VflLUE(fl-0> A3 THE ' 



330 PRIHI-FIRST CHARACTER. AP» SJIT[C,D.H,SI AS THE SECOND CHARACTER." 

310 PRINT- TTD &EE IHE REPAliflllC CARDS, EhTER A'P' IN' 

330 PRINT' PESPQPBE TO IHE 'UPHT CARD' GUERTi- 

3ftO PRIPI 

370 PRIPT'TPAT'S IT, ODGB LLICBM" 

310 PEP r 

3T0 FDR >;■■ TO 13 

400 REAB I 

410 1*^nifCHRtCZ} 

420 NEXT I 

4» DATA 35, 35,35, 35, Ii,?!, 72, 73, J?, 13, 73, 73, 73, 73, 13 

440 Zfl'GB 

4S0 PFl|l»I-H0U HANI POENTS (0 ENUTI GIVES SIAPDARD SB)-; 

AW ENPLf Z 

470 IF Z-0 THEN 4?0 

4S0 Vf'l 

4f0 FDP :(=0 TO Jl 

»|} A(K]>1 

STO NEXT ' 

570 PRIPT-HQU NAHT PLATERS-; 

530 IIPUT H 

S40 H-rifllN] 

S50 IF lf>4 TPEN 770 

5(0 FF lf>0 TPEN 3^0 

570 PPIHT-GNLT ONE IB FOUR PLATERS ALLOUED, RE-EPTER- ' 

aSO SOTO 320 

3?0 FDR 1=0 TD N-l 

£» BCV,0>"0 

ilO PRIHT-EHTER PLA1EK''S MhE-; 

A^O IliPUT HtlX^ 

dJO Y-LEHIPI(K]} 

440 FDR 1^1 TO 1 

aio Ti«nioi£Rtcic}tiiZ-iJ 

diO IF If- - THEN ilO 

670 HEir 1 

AGO IF Z>1 THEH 7l0 

AfO PRIHI-DOH'T aTAHE NA« UITH SPACEfHE-"? 

700 GOTO ilO 

710 J»llt}-P1DI(I»UJ,I|Z-T) 
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.iL.. 



_la_ 



- . - ■ *- 



V. 



Vv 



MtXT X 




i£4o hux 


Fi}R J>i> TU 127 




ifrso Hni t 


tKJi'" ■' 




U60 IF OCII1^93>=2? THEN 24St 


ilfXT J 




1&70 emo BSD 


U H'4 TKEEf SSe 




lAflO FDir S^O TD M-l 


IF 1(^1 THfh 314 




Uii 98-0 


PffIiir"SHOULIi I PLftT TOflCt 


Dft N^*; 


t4B2 5?=23-lLE#CSm3)+-7? 


iifpur 11 




TAS4 If l(fTlS?/:rt2<>59 THEN Se=1 


If I*<>-f* THEN 350 




I^Sd 3f^]MTfSf/2r 


^||**>-«C0BPU1ER^' 




fi^O PRINT SPCl^^SfJ^MCS);"^? HflHII"|SPCtST*Sa3t 


illCil? = "[" 




1700 HtKT S 


i]CN,eiia 




1710 PGIMT 


JI^N+I 




" 1??0 FOR S=D TB H-1 


fOfi 1=0 FQ 31 




1?30 Pfllitr* CLE Olf\ HftT SPEP-; 


K=A{[h 




1740 HCIT S 


T = INICR«DlP|t(i2-tJ+I) 




1?50 PRIflT 


ACIS^ACr? 




1?dO FOE Ei9 TQ 2 


AC^J=I 




1^0 FDB V«Q TQ N-t 


HEKT I 




17B0 Z=T*32*a*4 


FOH T=0 TO 7 




17fO PRirtT"r';T*(S?;" I";CHE5;* i"ji:*a-H5j' [■;i:tC742}; 


FOR j:^o TQ H-1 




1791 fRlUT" i"fCI(Z*JJ;" "■; 


pcKTTh=fla*^+j:) 




1R0O #ej;t t 


i:i<x*32-+Pi:<^r J >■***" 




ISID ^RTNT Ties^ 


BEST S 




>fl20 HEH S 


ff£]ir V 


J 


1930 pRim 


H=1 




1B40 RETURN 


mw^ i£ev 




1SB0 Ll=0!Hl3D 


FOR K=1 TO 7 




1fl?0 FOR K=0 TO H-1 


Pfr!«T"TRlCK ■'*;S;*f*Tife4H?" trtRD UJrC5]'= 


im TiltfTCAapfSyHI 


fOR I=D TO N'1 




1?1(1 Z=Q(Sp?]-TM 


]f 5tU?°-tDflrtlIERMH£P* 


2l??D 


1T20 PJTlitT M{X>- PLftlED THE -TSCf]" OF 'XICII 


Z=Z*I 




1?30 ClCX*J?40[^p?)?^" " 


FREMT^UltAT CARTip "^HXi 




1m If DUt^iXEllH^J IHEN 19i0 


ftr^Ht nif 




im ti=:t 


II2PJT El 




1?6fl If OCKp^KOdttp?) T«N l^eO 


IF ElO"P** THEB iTOfl 




1?71| H1=I 


- BDSJS UBC 




]?B0 «ej:t jl 


- GU]I| 1D44 




1^90 IF fl=1 TWEH 2030 


■ T^LEHfE*? 




ZtOD aCLTpRP-1 


■ IF f=2 TH£« mo 




2*ID PRINT NtCLir" UON TRICK f;R 


■ PRlH^Bftl [NfUt.PE-tflltR 


■ 


?»l> &0I0 20)0 


' &DIIJ 10^1? 




?(35 QC*tl,Jl]-l 


■ TI^NIDtfElpl^l) 




2040 PRINT MI^HI}^ UDK TPlCK ll";A 


' I»>n]&l4El.2t1> 




:^«so fl=>D 


■ IF 1ALCr*]>0 THEN 1T?& 




2040 IF <l(LlplOK>ll{mpll?] tNEH Ji>e^ 


■ IF rtO"*^ IJIEB I12D 




20?0 H=T 


■ T*^"!" 




20AO RFIUftN 


■ TttVftLEIt? 




2D?0 LI^OtLZtUtHf^OlRZ-fl 


■ IF r-fl TH£H 11?J 




2100 FOR 5=0 TD U-2 


■ If T>H THEN 11M 




2110 FDR S]=0 TO 7 


■ i=0 




2121] IF PCSTSt]>PiLlTL25 THEN ^liQ 


■ ll(Kpl5)=0 




21311 IF CitSi^JfPiSp&IJjT'^ ^ TrtEH 2ii0 


1 JF H^"C" THEN 1i?0 




2140 LI'S 


. r^s 




2I51> I2=5a 


f IF Z1=°S" THEH 1320 




7140 IF PCSpaPKFiH3pH2] THEN 221^0 


^ ea^to^=i 




J170 IF i;i(st32+-pis^ssn=* " thejj 2201? 


^ Z-1 




2iei> Hi-a 


^ IF t»="r THE« TJM 




3190 H2=S1 


f 1^2 




2200 JfEI^T 51 


f IF ZK>^!1- THEN 1I2Q 




3230 «xt S 


1 i-(T-(m#z 




2220 FDR S=R-] TO 7 


1 IF CJ(StJ^4Y)^)"•■ TIEN 


1120 


22J0 IF HH TMErt 2260 


1 QfXp??=T 




2210 IF P[N-!,SKP1L1,L:) THEH 2240 


^ hfHI I 




22S0 QOTfl 2Zf[^ 


^ sosiri laso 




2240 IF SRDIH).! THEH 2381 


^ tl£VT t 




2270 EOTO 2300 


h FAR X^5 TO «-1 




2;B0 if ?CH-1pS);pmipHf) then 72d0 


f fUR Z=-0 TO J1 




22?0 MIT S 


h IF « i 32+1+2 >="*" THEH H3(l 


2300 HI =32 


r irEj^r I 




2310 T = IliT^R«MItUttttUS 


f PRINJ-Efll SCAN" 




2320 FQR ai="R'1 TO 7 


f Ct(32*3:fZ]=" ■ 




2330 Ll=ABStPCH-1pS1)-T) 


s tt(j(p?^=: 




23^0 IF HKL1 THEfl 2371 


? HEAT X 




2350 H1=L1 


3 RiS 




2340 S<SI 


3 GQSLIB TSSO 




2J70 NEKT 9T 


3 HI^C 




2390 fi(K^»J*l>f|i-f,S] 


1 PftlitTTHAT HflMD ■; 




23»0 PfN-1,5)-P1H"1,R-1J 


} fOP ;c^l> TD N~l 




2400 Z=a(Xj?]"CINT[fl(I^?)/4)»4) 


> (f»^»>0 




241* If l<7 Tfif** 2430 


> T^e 




2420 2=flBSiZ'3) 


J Z^fl 




2430 t]CXtlOJ»£ 


) FOfi R=1 TO a 




2440 ODTD 1340 


> Z^Z+D'"(^R5 




2450 IF H13tt-2 JKH 2StO 


] S{?i^RI''V 




2ia0 FOR X-HU1 TO N-1 


) IF QCiripll+lhOO THEH UOO 


2170 IF Q^Hl^Oh^QCKpO) THEA ?500 


) T^T+I»Z 




2 ISO PAJtfT'-OAflE TEEB 4FTErf EEJ^ULATIQH^ EHTEfilfli] 5UIVEN DtMti'' 


} I-O 




21fO eOTO 650 


) JTEJ^T J1 




2500 NEXT I 


> B(:(,0J"0(lpO3*V 




2010 PRIflT Hi(Ht]'|f(IH THE BAHE, J^HHRATULAIIONS ''Stdlll 


3 PRINT HK?:?" acoflEn ";i. 


;'POWTS FAR ft-;fl(X^01;-T0TAL" 


2S20 END 


3 IF □4fl1,0}>O<X,0h TNEff ' 


l&^O 


OL 
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Pasart 



Description: 

This program generates 
on Pascal's triangle. 



artlsMc patterns based 



Comments : 

Pascal's triangle is one o\ the most famous 
number patterns In marhematlcs. The rriargle is 
very easy lo construct The first two rows consist 
of only ra. Each of the subsequent heve a 1 at 
either end of the row, but all other numbers in the 
pattern are the sum of the two numbers to the rrght 
and left In the row above. An example, illuslrallng 
the first 6 rows of Itie triangle. Is shown below: 

1 

1 1 

1 2 1 

13 3 1 

14 6 4 1 

1 5 10 10 5 1 



Option 3 creates a design based on Pascal's 
triangles In the four comers of a square. An ex- 
ample of how the machine uses tour Pascal's tri- 
angles in the comers of an 8x8 array to create an 
artistic design based on eliminating the multiples 
of 2 is shown below. 



11111111 




12 3 3 2 1 


4 ^ * * 


13 3 1 


1N ■ * * 


1 1 




13 3 1 


# « A 4 


12 3 3 2 1 


* # * 4 


11111111 




Before Printing 


After Printing 



Approximatety 5 minutes of terminal time is 
required lo print a design with dimensions of 36x36. 

PASART and this description written by Charles A. 
Lund. They first appeared in Oea/'ve Commuting. 
Mar/Apr 1977. 



The program provides the user with three options 
during the course of a RUN, 
They are: 

1. A single "Pascal's triangle" 

2. Two "Pascars triangles" 

3. Four "Pascai^s triangles" 

A user may also specify the size Of the array and 
the multiples of the number to be sllminated^ 

Option 1 simply allows a user to examine an 
artistic picture of the relative positions of the mul- 
tiples ot any number in the array. The apex of tlie 
array will appear in the upper left corner ot Ihe page. 

An example of how the machine uses a "triangle" 
to create a design t>ased on eliminating the multiples 
of two ks shown baJow. 

1111 .... 

12 3 4 ' ' 

1 3 6 10 
1 4 10 20 

Before Printing After Printing 

Option 2 allows a user to create a picture based 
Oh two Pascal's triangles In opposite corners of a 
square array. An example of how the machine uses 
two Pascal's triangles In the corners of a square to 
create a design based on slimlnatlnQ the mulliplea 
of 2 Is shown befow: 
11110 .... 

12 3 1 - . . 

13 3 1 . . - . 
10 3 2 1 . - . 
1111 - - - . 

Before Printing After Printing 
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PABAtl 

cufatiuf CDDPUTiia 

fiaMI3EDHI HEII JEVSEV 



TiriS P'OGNAl C'E^TEt MMtf DtSllSn^ VMSEB 04 PilSCikL'a EHXIiifSLf. 

mj riiiiic 1 jASic TrPE^ OF DESc&tta rn select Fffoni 

r- fl 9IHGLE ra9i:ilL'G TtJAIt6LC (KltlED UTh itif fllTIlSTIi: fLflJTEt 
Z. Tua 'fitT9T' PIlLfiL'S TPIiMfSLfS fHTHTEl BaCX TO hICH 
3. FQUir 'AITTSr' TfflUeLES ■■ THE COanEB SF 

4 ^IfUHItE lilHikT. 
Uhll'S rOUl PLEIi3JKT 1 . 7 OP JT ? 
UmCH IIVCTTPLE5 H TOU LMIT tCPHESEHTED UJlri ILAMTST 2 

Htv Mm' Bous hn goluhs m the arihi rai ts palihui]' ia 



«^« « t * * 4 t **V 
**«» tttt *«t* «•#• * 

*« «■ «* 14 tt 

* 4 * • t4«t 

***« ** 4ttt 

4 * * t t « 

• li. 1 # t • t t 




4 t 4 t 4 4 
«**« *4 ft** 

**•• #»* t*4t 

»«*• t t * * 
«* 4 t *l ** ft 

* ««*« «4«t ^ttf ttft 

4** 4 * * * * 4 4 t 



on 
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HSEItlGTOUl HEU JERSEY 



PASWT 

CUATIVE COIFUTIIIG 

VMltlSTOHil NEU JtBSCT 



T»II5 PPiOQfiAn CRErt7E9 ARTIST DEBIG»fS BASE! GN f^SI^^S TftJM&tE. 

mu HAVE .3 SftSlC rrPfS DF DESISTS ^Q SEL^tiT FRONl 

U A &IHSL€ PAtCAL^a TEIAiffiLE (fLA^ES UJTtf AH A'TJSTIC FLARE) 

2. lua 'ABT91' PASCAL'S TITIAIieLES PITIITEIl lACK TD lACI 

3^ FOJI 'ARTflT^ TltlAHBLES Ilk THE CQfrHER Of 

fl SflUARE ARfrAT, 
UHlir^S TOifR FLfASUREf ) p 2 W )T 1 

LIHTCH tlULtlPLES M YOU UAVT REPRFSEHTEB UlTH BLAIWS^ 2 
HDU NA#T R9US AUB EOLLflS IN TIE AREAT [1A IS Hll3<JNLW)7 li 
fftf^tt*4»««4«*«444*****«t4*-tttf4t4# 

* ••4*4t****»*** + ** 
tt *4 »4 ** »« *4 f4 t* *4 

4*** 4*4* 4*»4 4**4 44t* 

*4 *4 ft f* 4* 

+ 4 ft p# 4t 44 

4 * 4 4 * 

*4444**t 4 + *4tttf 

* « 4 * 4 t 4 

* 4 t 4 * 4 

■4 4 4 

4 t t 4 

4 t 

4 f 

4 



THIS PROBRAH CGEATES JIHT13T »ESJ»IS BASCG DH PASCAL'S H]lriGLE> 
TJHI HAVE 3 BA5ID TrP££ DF DE5L£HS TD SELECT FPHIH: 

1, A 5EKSLE PASI:AL-^3 THIARCLE IPCATEQ If^TH AH ARTTSTIC FLAK> 

2, TUQ 'AltlSr Pfl3[:AL'& TltlAHELES FfllHTE^ BACK TG BACH 
3^ FIJUE ^ARTBT^ TRIANflLEa IH THE CDRNER OF 

fl SaUAItE ARAAY^ 
HHAT^S TDUR PL£A5URET Tp 2 OR J? J 

UHICH HULTIPLES H fW UAIT REPRESEHIED UIIH tt-AMHS? 10 
HIH HA#T ASIfS AHI CDLIMS IH THE drRAf (^ IS HAitlHUHlT 3A 



* « * 4 t 4 

* 4 4 t t 4 

* 4 t 

t f f t #4 

* 4 4 

* 4 4 

* 4 

* 4 * 4 

* 4 * 4 
4 * 

4 4 4 4 

4 4 

4 4 

4 

4 4 4 * 
4 * 4 * 

4 4 





^ 
f 


4*4 

4*4 


4 

4 




* 




4 
4 


* * 

* * 


4 4 i 
4 4 


1 4 4 P 

4 4 


4 4 
4 4 


4 
* 






4 


4 


4444*444 

44444444 






4*4 


4 




* 




4 


* 


4 


4 


* 


* 






* 


* 


« V V 4 4 4 4 






* * 4 










4 










4 








4 


* 4 4 4 4 




4 








* 




















4 


* 


4 4 4 4 4 




4 

4 


t t * 


4 

4 




* 

* 




* 










* 






4 
4 


4 
4 


*444*44t 
* 4 * 4**4 








4 


























4 


14 4 4 4 4 




4 


4*4 


4 




























t*t44444 






4*4 






























4*4 * 4 




4 


4 * 1 


4 




























4^4444*4 




4 


4 * * 






























4 4 4 4 4 4 4 




4 
































* 4*4* 










































































4 ^ f 


































4 4 4 


















































































































































t t * 


































4 4* 












































































* 


1 4 4 






























4 4 4 4 4 
* 1 * * « V 4 




t 


* 4 4 


4 




























44444444 




^ 


* * 4 
4*4 


4 




























4 4 4 4 4 
44444444 








4 




























4*4 444 




4 




4 




4 




















4 




+ * t « * 4 t 




t 


+ 4 « 


4 




* 




4 










* 






4 




44444444 




f 








t 




















4 




* 4*44 






4*4 










4 










* 










4 4 4 4 4 




4 


4*4 

4 A ^ 


4 




t 




4 


t 


a 

a ^ 


4 


4 


* 






4 




« 4 4 t « * 4 




4 


T P T 

4*4 


4 




* 




p 
4 


4 * 


4 4 1 


^ + 44 


p p 
4 4 


* 






4 




44*44444 



UHAt'S yOUf PlEAJBIlF* t, 3 BR 3^ 3 

UHECH NUUEfLE^ IQ lUU UAJIf SEPAESENTED UUH ILAHKST 3 

HSU HAHT ROUS AHP CDLJI13 EH tK ARRAT 434 19 n^XIHUn^t 3d 

4t4**4444444**44ft444444**4444444444 

44 44 44 44 t* ** *4 4* *4 44 44 * 

4«4«4* 444*4 

444444 44**44 ««4I44 *4444 

^*** 44*4 4**4 444 

* t 4 4 4 4 4 

444 444 44* 44 

4 4 4 t 4 4 4 

4 4 4 

«t444**44 4**44444 

444444 44444 

4 P 4 4 4 

4**P«4 44444 

4 4 4 4 4 4 4 

4 4 4 

4 4 * 4 4 

4 4 4 

* 

4 

4 * * 

4 4 4 « * 

4 4 4 

4*44 444 

444444 44444 

4*4 * P 

444444 4fr*t« 

4^44*44*4 4444*444 

* * 4 

* * * * 4 4 4 

4*V **4 444 44 

+ 4 4 4 * * 4 

4444 4444 444* 444 

44***4 444444 444444 i^P44P 

4444** 44444 



:ttt44**44*44444444*4P**P**4* 



4 4*444 



tHHT'B leitf PLEASURET ^ ? OR 3^ 1 

UHICH HJLEIPLES BG iTOtJ UMt HEPRESEfllEI UtTH UMHST 14 
HDU HAIfr RSUS A»& COLlttB f*i T*IE ARRAV E3i IS HAKIHUHJt 36 
4pp4*444^*p444444444444**4*4p*4**444 
4*4*4*444 *44**44** 4****444* 4**4*4 
«Pt 4*44444441 444 4^4 t44444*4*4 4 

44 444 4444 44 44 444*444 4 

4*44 4 4**4 4444*4 4444 4 4444 

444444P4444P4I44444* t44 + *ttt4444 

444P *tpp**444 4444 44444 *t44 4 

444 4444*44 *4t 44P4 444 4 

4*444*44 *4 4444*4444 44 

44444 4 »4f44p** 



44**444*4 1:4*4 4 

**4* 44* 4tt 44 

4 4 4 4 4 4 1 

4 4 4 P 

444*444444 



4 * 



4#P **444 * 4 

4* *44 44 4 
4 4*44 
4444* 44* 

4*44 * 

4 4 4 4 4 4 

4 4 4 4 

PP4P444* 4 

*44*44444 

*P44«P44*« 

4 4 4 4 4*4 

4 4 4 4 * * 

4 4 4 

44444444 
4 4 4 4 * * 4 

444444*4 

4*4 4 4 * 

4 4 I 4 4 4 4 * 
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T>[« nORU EUATEB MTItT KSIBHS l»9E» 01 PUCllL'S TPfVeL£. 
Yia HiH 3 W>]G TTtEt Of lESIBIS TO ttL€C? FtOMi 

I. t^ 9»nF PAtcu'a itiAmic cpuico tin u Mrmic flak) 
z. Til '«rsr' Hfc*L'i iiiMitn pi[«t(i i*C( to mgh 

3- Flit '«T|T' TMWHLES IN IW COhWl IF 

4 SIU4K mUT- 
UNT'I 19m PLEilUMET 1» S IR It 3 

UnCH IUt.T]PtFl H TM VAHT REPBESCIIIEI IttlH MABtT 17 
HW HHT NIM Aft GDLMH3 IH TH MMT f3» » rtnKlinH>t 3A 












••*«••••«*■>*> 



•■■••**■■■• 






■ • t » » • 

• • • > > 

■ • • > 

« • 

• • 

B ■ • 

■ • • • 

• > • • • 

« * 1 > a > 



• ' • f • 

« * • « 

* ■ • 
a t 

« • 

• • • 

■ ■ > > 

■ B • ■ » 

• • a a a > 
v*>««aaa 



«>■*■■■••>> 



■••Baa>>*««>a'< 



■•■••aaaaa<>>*"" 



LI9T 

4 p(rm T«fi<i;-ci(HiiiE conruTiw 

e ppiiTini*(ifiiiiT 
It nn naitSk) 

23 Fit E1<1 TB 3A 

24 fdt B7<1 tl 34 

Zi PII1tl21-» 

21 IIEICl Bf 

3t lElT B1 ' 

4t KtlriT -THIS PPflOVM CREATES ARTTlT DE9IBNS ?AS€P W HSUL'S TtlM'; 

47 hriHT 'ELE." 

H riEHT -TOI HtE 3 IMIG ]Tr£l V HBIlva TO SEIECT FVOHl- 

it PtlHT *l. 4 8INIC nifUL-'S TBEAieLF IPlATEi UlTH «■ HBTEJTIG FLHt-! 

ii nw -El- 

71 PIlfT *2. Tin 'AVIfll' PMUL'B TIIUTSUB ntllTTED BdCV TO t^Cf 

Dl PHUT -3. FODR '«IST' TRtABGLEB II TK CWMH OF" 

Tl PBIIT ' A BUIVE 4»IV.- 

1M MINT -Irtll'S TOIH FLErtWE* T, 2 OR 3^ 

110 llfUl 

Mt IF (l)-1»-IO-2l<CD-3} <> THEM 1M 

1» PtlNT -IMICH nULTEfLES ID TOU UHT lEPBESEIfTED UIIH tLtmS'; 

110 E«rUT • 

130 PtiHT -Hm BAir lous aai coiuiis im ih uftti c3d E3 mjhruii-} 
iw itfur T 

170 IF Tt(3£-rr < THEII llO 

1M 01 Mil 231),440,Affl 

IK KEH 

3H lEH 

21« «En TlllE TB CBUIE Ml PBIHT A BIHOU flEtE OF PASMT 

3» lEH FIBBT lUILI IIH P4ICIIL3 KrllMLE 

2H Fur t-l TB I 

24C FN C-^ Tl T 

2» IF IR-ll'iC-ll-O THEN J80 

2M PEI >C »«r( B >C-1 ) >P IR- 1 , C I 

27(1 UTD 3W 

2ao PCt,C>-l 

2T0 REILT C 

3*4 NEXT P 

310 IfH IIMC n PLAT UCK TIC TBUHOLC H|TH M AlTISTIC FUK. 

UO FM R-l Tl T 

3M FHr G-l TO T 

3» JF PCI, GUI T«a 314 



3» IF (P{BtC>/ll-EliriPCI,C]/B) THEN 300 

Ua HIBT -• 'i 

i7t aiTB 3t0 

311 ftlBT ' 

3TI HIT C 

41* PRINT 

410 REIT R 

420 ENI 

430 REI TIHC TO GtEATE U* PRINT I0U1LE PIECC IF PUKl - 

440 Z-T 

43» RED MELI THE UPPER LEFT HUI UtJ DF THt flRRKI. 

4iB LET N'2 

47* FOR R'l Tl N 

41* FOn t'i Tl E-1 

4T* IF (R-I]«(C-II-Q THEN 330 

ato pci,c}-rii,c-iJ*PcR-i,ci 

SIO eOTO S3* 

a» PII,Elal 

a» iCII C 

VO E-I'1 

?» NEXT R 

540 lEH MIL* THE LOWER AllHT HikLF OF THE iHRAT. 

S7I J-N 

ua B<2 

St* FOR t-Z II 1 STEP -1 

410 FOB t'l ri N STEP -I 

410 EF CB-2>>IG-2l-0 THEN 440 

420 PE t, C >-r< I p G>l ifW*^ ,GI 

410 Biro 410 

410 P[B,CI-I 
434 HtlT C 
iW N-N*] 
*70 «in R 

411 1010 320 
4tO B<0 

7*0 REfl lUILD THE UPPER LEFT HALF GQRNEt OF IK 4BPt4], 

710 T«T 

710 I'INHT/2) 

73* (3-r<! 

714 ZI>Z 

730 Z2-EI 

7^4 ZJ-n 

770 14-13 

7B0 15-14 

7*4 FDR 1-1 TO 21 

BH FDR J-l (0 1 

01* IF U-1»II'II>0 THEN 1*0 

B;0 PCI,J]>PCl,J-1»<PI]'1,JI 

830 OQTO ISO 

81* PUpJ}-! 

194 NEIl J 

out Z-I-l 

in Ntn I 

8I» II-Z1 

Bta BEN BBILI TIE UPPER rtllHT HMII CORNER OF THE 4IRt1. 

9tt FOR I'l TO Zl 

Vie FOIt J-r Tl 15*1 8TEP -1 

92* IF E-l THE! 949 

930 IF J-T THEB 941 -r 

910 Pa,J>-P<E,J'1HHl-l,Jl 

950 80TO 97* 

9i4 P(l,i}-I 

974 HCi:] J 

910 X5-T3<1 

994 NEJIT 1 

1400 1-22 

141* flEH HJILB THE LQUER LEFT COMER OF THE AKRAf 

1420 FOR J-1 Ja U*i STEP -I 

f»30 FOR J-l Tl I? 

t»44 EF J-l THEN 1410 

1150 EF ]-T THEN Um 

1144 PflpJ>-P(IpJ-l}«fCl-'1.J> 

1170 OOTO 1*91 

1114 Ptl.JF-l 

1*91 HEU J 

1144 E3-Z2-I 

in* BEXT I 

H2B B-ri 

1131 BEN rUUB THE LDUER H1BHT CDmEB OF TIE ARRAV^ 

me FDR i-r lo Nti ^lip -\ 

I^S* FOR J-T TO liH STEP -I 

IT44 IF J-T THEN 1290 

1174 IF I>T THN 1240 

I1B4 PatJ}-P(l4lrJ}<PI]tJ*H 

11*4 BOTO 1214 

1214 P1E,J>-) 

1210 HEIT J 

1224 Z3-Z3*l 

12M NIIT I 

1244 8ITC 320 

12SI Ell 

- m 



«' 
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Pasart 1 



This program isamajorejtlension ot 
the original Pasart program, ft incor- 
porates many new options including 
prinling a calendar for any year from 
1600 to 2300- It allows a user to enter 
any de&rired pair of prfnting characters. 
Thesizeohhe output Is expanded to 72 
by 72 with an option to expand it further 
by dividing the final iriangie fntc 72 by 
72 chunks that may be taped together. 
Another ophon provides the user with 
thG opportunity to create a picTur© 
based on four Pascal's tables (option 
S>- 

There wasn1 room to show the 
output from all of these options on 
these pages- Try ihem out yourself and 
were sure you1l be pleased with the 
rarher spectacular results 

Pasart 2 was also written by Charles 
H. Lund_ 



CltEATIVE J:DHPUT]ilD 



TKI5 F-RDGRAn CB£A?ES AATISJ fiESlGriS Brt^fD QM 

pj^scaL'S rr I angle. 

DD TJllI UftWT A LT5T QF DPTLQflST T£S 

PLEftSE TE^P WF THIS LiSI MJ^ SftV£ llfi POST FUR FUTURE BEfEriEftLE 



RUN 



1. A UVilt PUGCALS TRIAirCLE 
SEFOITE PRIflTlftlj 

1 ^ 1 

1 2 3 

1 J t 

Z. h SIW^LE PR£CftL3 TRJi^TOLE 
EEFUKE PFtli[r]J1& 
1 

1 I 
1 2 1 
I. ft $JNSLE PASCALS rRIANfiuE 
tEFDRf fFL|^T[NG 
I 

1 3 f 
13 3 1 

4. TUD PABCAL-S leiAH&LES 

JEFDRE PlilNTINe 
1110 
12 1 
10 2 1 
Dill 

5. F1TDR PASCAL TRIANSlES 

fitFURE FtlHJlNQ 
1 I 1 1 I 

2 2 



T 1 



5^ PCUR PASCALS 

] 1 

i 2 

i 3 

1 3 

1 1 

1 \ 



3 i 



TFtlftHflLE^ 

pfiiwrinQ 
tilt 

2 

i 

3 
2 

T 



PlATfP mCJT ItKt TflI5: 
AHEIt FRlttillU 
«t 

Pt.ATEB tAC»r LIK THIS J 
nft^K PFLINTIIIC 

* 

t 4 

PLilTiD BflC*: LIKE TttIS: 
hFTER PRINTING 

* « 
' 1 4 « 
PliJHTED SACK TD BACK ITKE THI^e 
ftFTEft "HfTini 

*4* 

A » 
4 4 

4*« 
PriHtFH IN A SatTARE LIKE TtfISc 
AFTER PRLffimii 

44*4*T 
4 t 

t 4 

44*i^t* 

PrtJaJT^B CN A JCLJfrRE LIKE T"HIE: 
AFTE£ ffMNTlfllj 

* *t * 
t* t4 
«rt 4t 



?TAftTItflj FA^CftLS TRIPiNSlE CH AtfT SESIRED ROU £ CBHTHW 

SO THAT A tlSES CAK TAPE TiUJETHER SEVERAL PICTJftE? 

Tt flAKC A LAR6EIV [tESI64l. FNIS [?PTTDfl ExiIffDS 

PrcrUKig lltlE those SHDI^N Jh OPTIOJT 1 Iri 3i t 36 chj^racter 

CHtlJ#K^. EhTklii, UP TD 1C"iil HDUS AifD tClLJH*IS iU?E AC£EPIFII- 



WNArS TOUR PLtftSitFTE C^^,J^^,5pft Dp ^)^ 4 

■VUUfr PJCTlfRE SH0ULP HI GPL ISM T m WLTIPLE9 IJF UtfAT HUflAEFt' 4 

UttAT CHARACIEFr ^IQULB TO*] L]fl THf COhPVtER TB TTPE REPRESEtfTH^G 

THE ffULT"FfLES Of i ItHTER ■'^ " FDS A SLANH^t - - 

Ijm CHARACTER «DtJi.li TflU LIKE THE tflhPUTFR 70 TtP£ »£PRESFriTlBO 

£«CH BF THE DTH£R ^iL-flBEPB TH TrtE fftlTERJf lEHTEl! - " FflK fl llfl*l*t?' 

HDtf JIANt RHUS AtlEi ClJLUftNS [if THE ARpflT T3i IS HAI J* Jfi 

UDULU TDU LJK£ A CALENm PfiENTED UITH TQUfi PJCFURE.^ TES 

UilAI TEA* BfTITEEH IfiOO AMR 230(^ yoULU VOy LI^E^ t»7? 

*** *44 V4 ^*44*+*4=t^-Pk»*«+444P4 m4.*«4 ** 
«»4 *lt ^tt »*v ^t 4^4 H.ff 4,4 

f*t4*t fIrtV* 4+#41if 
4 V ^ 4 * * 

4|4ll*V«*t^t 



P « 



4**4+* 

■* * t 



■V* I * *4f 

** ** *« 

« 4 t 



*4+****4v4^4 
**4 4 p «P4 
** ^4 +* 
:i * »fr 



44 p 
P +* 

4i=* 

t 



«pi^ 

4**4 
* t 4 

4fii4** 
**4 4+» 

tfz^pp** 

* t * 

M 44 Pt 

*it4 p * 4*4 



#** **4+* * ^v t *« ^***4+«H4 p 
*** *44 i » t t 44v tpK 
4rP4Vt *t tr »4*4+t 

=* * * ^ 4 * « « 

4t** p«#* *4M 

'4* 4 * 4*1* 

** ** *« 

* • 4 4+it*4***44*4 
4p*r*4**4*4tpppp4*4 V L 4 * t 4 
*** *4* wt* *±4 4 * ***+** **M«4 
4**4*4 I^Pf^* 4 4 PV4 **4 *4t +*4 

* * V * t * *t4^PP4*4*4t*4*p*** 
4**4*44*«r** 4 4* 
4frp ^ * *4f «t u ^, 

4t t* »4 :«** 4 4 t« 

4 ^ P *44« 4*44 tft4± 

v*r»4#PP *4* * 4 4*4 

*** *** *»+*4+ 4P 44 444tP4 

4**«P4 *** 4P4 P * 4 4 *4* 4ftrt 

* * * *4*^**p*44*4*4*4^p^44444 
4**4 4 4 * 4 4 V 
»#»* 4* »* » U 44 44 
** P4P 4 4 4*« t44 4 P^ 4*4 

* *P^P4^*t*4t* 4*4444v4t«44 
**t V** 4PP **4 :f44 
44 4 *44«n *t»»4 4to«*4 444444 
4 t* t*4 *Pl 4** 4P4 P** 44+ 4«P +*4 
'P* *** **+4* * T* ^P44*4*44*44 4+p>f 1^*44*4 







JAPTIJART 


1?7* 




■■ft±3^^HpVV 


muw^= 


T^ = = ^ = = ^ 




x^=z===^i; 


■SUA NDM 


TtlE 


L!Et 


THU 


fRi a» 


==K'H4*l*^C 






rE=??=^ 


m^^P1BBE=: 


1 


? 


3 


4 


S A 


7 i 


T 


TO 


11 


12 IJ 


lA 


U 


17 


IB 


11 30 


21 22 


2J 


2t 


?5 


?fl ;? 


2i 2^ 


3^ 

C E = = = 




■fl»^^= 


=~??qFsi« 






FESRtfART t?7V 

= E> K> J »H»HC = ±^E±;r79TaH»tad*HX = = x ?? = ==■ ■■■! 

I SUA HflR TUE UEB THU FRI Jflrs 





¥£■■■1 


-=-.. 


rVEHBI 


1 


2 


J 


1 


i 


6 


7 


B 


? 


10 


It 


12 


13 


14 


15 


]6 


17 


ie 


19 


?J 


?] 


22 


J1 


24 




2^ 


2? 


:e 


tnXHtXTKI 







HftRCW ir79 



1 SUV nQn 


'■L±z== 

TIE 


Uf& 


THU 


Fftl SAT 1 


■»l^kz=z=^z 


---'■- 


turiJE 


t 


=-^TrT9rTEKBI 

: 3 


4 3 


A 


7 


S 


? 10 


1] U 


U 


14 


15 


lii 1? 


13 19 


2D 


21 


2i 


23 34 


25 2i 


2? 


2ft 

= -=-»pi 


:? 


30 J\ 
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II) PRfNT T 



2i5 
40 

:ip 

7fl 
HP 
13D 
1]5 

1SI> 
1?D 
1BI> 
1?i> 
JD& 
21i> 
3!U 
210 
2^i5 
250 
240 
270 

":e3 

2?0 
-lOfl 
510 

330 
■?« 
350 

3^D 
3?& 
3BU 
310 

41D 

43D 



COMPUTING- 
■tU JfR9Ef" 



PKINT TAB L20 J ; "CREATIVE 
PfiIHT:FllJftT:PSIHT 

Rin ttt t[i]5 PitflGi^An REUUIRES ASQUND id»: fRE£ udhk space 
Rtn *«* TD OSTAIN Li^HQCR ^UT^Elp EJiPAHD VHE ABPAk IH LINE 
R£fl t*t MO TO f C;2p?23 

Dill F[34H3d^ 

PRIIfl * THIS fROl^F^AM lIGfATEB ARTIST B€SIQtf9 BlibED ON** 

PRINT 'PliBCftL-'S TRIANfiLE,** 

FRIHI -ffO >0U lffi«T A U8T BF OPT IONS'; 

[NPUT SH 

IF LfFTKaUpUO'T* THEN i35 

PPINT "Kl^n TEAfr BKf THIS LIST ANQ SBW OR PMT FOR FUTURE REF£PE«C£" 



IdO 
170 



PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PflLriT 
PftINT 
Ffl[ar 
PJll*IT 

fRlffl 

FRIHT 
FRIHT 
PRIHT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
fl^O^RINT 
^10 FEINT 
PfiINT 
PtINT 
PfilHT 
PlllNT 
FSINT 
PflINT 
PfrJ^T 
FftltfT 
fRlHT 
PRIJ«T 
PRINT 
PRIMT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
INFUT 
IF D^ 
PRINT 
PRINT 
IHPUT 
PRINT 
PRINT 
INPUT 
PRINT 
PRINT 
I4IPUT 
If = 7 
PHINT 
IHPhfT 



1. A SINGLE PA&CilLS TRIANGLE 

iEfJJHE PRJNIEN6 
t t t 
1 ? 3 
1 I 6 

2. A SINGLE PftSCALB TRIANGLE 

BEFQitE PRFNTjitO 
t 

1 1 
1 2 T 

3. H SEHIiLE fflSCfllS TK[fl»fl3LE 

KFifRE Pfr3*fTING 
I 
I 2 1 
' ] 3 3 1 

■4. TUB frtSDrtLG TRIAJ^GLES 
&EFORE fRINTING 
1110 
7 1 
2 t 
E 4 1 
r|!]ANGLEG 
PRINT[N£ 



PLATED BACt: LIKE THIS:' 
fiflEFt PflENTiH6- 

f*f" 

* •■' 

**• 
PLATED BAC*! LISE THIS:' 
AFTER FFT[«T]|flj" 
*" 

* *■ 
PtAUD EACH LIKE THTSi' 
AFTER ffilrfTING" 



p H M T 

PPIHTED BACK TO BACK LIKE THI5:' 
ilFTEP PRINTING-* 

■» ^° 
* *'■ 

PRTHTfTI IN A SQUARE LIKE THIS:" 
AFTER PRINTEH6* 



^?0 
lUO 
530 
520 
:330 
5*0 

5iif 
37& 
!)BD 
59D 

ilD 
62\^ 
iJt 
d^O 
^Sl} 
i55 
66^ 
4?0 

70O 
7HJ 

7?0 
730 
.'ID 
750 
740 

7S0 
SOO 
SlO 
320 
330 
340 
530 
920 
9J0 

?50 
?40 
??€ 



1 

1 



5, Feus: PASCAL 

BEfDRE 

t 1 1 1 ] 1 •*•*•*" 

1 Z 2 S • *■ 

1 1 :t *- 

1 I * t^ 

12 2 1 • ** 

1 t T t 1 1 :f*»f:t*- 

4- rOUR PA^CfiL5 TilIiqff01.ES PPT41TE0 IN A BOVj^RE LilLE THIS:' 
BEFORE PRINTlilG AFTER PIlJWTIitS" 

( 1 t 1 1 1 »tHT«l" 

1 2 3 3 Z I *:+**■■ 

1 3 A 4 3 F tt 4*^ 

13 4 6 3 1 ** *•" 
12 3 3 2 1 t +• •" 

1111?: t^t*lK" 

7^ BTARTI41I} PASCALS TRfANGU IN Atil BE5LRED 
SO THAT A USER CAN TAPE TOGETHER SEVERAL 
TG Hj^KE a larger 1iES|GN+ TM[5 OPTION E;<TENB5" 
PICTURE? LIKE TliOSt SHOHN IN GPTIOff 1 If^ 34 X 3i CHARACTER" 
CHUNKS. ENTRIES UP TO lOflO ROUS AtfD CDLUflNS ARE ACCEPTEB-" 



RGU J i;aJ.UttU" 
P3CTUff£S" 



'VHIiT-'E YDGR PLEASURE 



[SjZp 



3pqf?fi OP ??' 



7 A^B D>=t THEN 4^0 

^L^fl SUPPOSES TO »E TGUR fRIEriS^ Sfl JlQil AfOUV Ht^tOOTO i30 

"TQlfR PICTURE SffDGLil KIGNLIGHT THE rtlTLTERLE? GF UHaT NUt^BtR' 



"iJHAt CHURACTER IfGULD VOG LIKE 
"THE JtULTIPLE? OF '\\i; ■^ElHTElt 



THE COMPUTER rG TtFE 
^^ ^' FOR A BLANKS": 



ffEPRESEttTINO' 



51 

"UFtftT 
"EACH 
Tt 

THEN 7fl0 
"HOU rJAHT 
T 



CHARACTER UGULB ^GU 
Of THE OlrtES ilUtt5ER5 



LIKE THE COHPtfTER TO tTPE REPRESENTrpfG" 
[H Ul PAITERil lEIflER ^' ^^ FOR A BLANK J ' 



RQltS AND C01.Uflfl3 IM THE ARRA"J C3* 15 NAit. S"; 



PRINT -BE PJASBNAELE!":GDTD 750 

rOB LIKE A £ALt.NUAFi PRlHlFEi Vl[H TfiUR ftd^RE'; 



If l>5fi THEN 

PSINT "UOULB 

lilPLIT ft5t 

IF L£FTf(Rll,1 K;"r TkE« 950 

PKINT "UhAT VEaA BETifEEff t4Dg i^N[l 2MQ UQJLL^ TDU Llf^E'*; 

IHPUT V9 

IF T?t[30??-T?5<=G IHE« fRIHT 'EVEJt I HARE HI9Tfllt£SI"lWT0 8Z0 

Q+i GUTfl J^^^^2l*fl^^i3O^1^10,151l^p151Jp^550 

REn T]NE m CREATE AND PlilllT 1^ SIN&LE F1EI:E OF PASART 

REPI FIRST BUILB TUE PA3CIILS TRIANGLE 

FBR R=1 TO T 

FBR C=l TO I 

IF (R-t]*CC-1?=0 THEN lOID 

P[RjC]=P{R-1tC]+-P{R^C-n 

If PtEtE:J<lt*B*(l THEH 1020 



QtO F 

lOOD 
IfrlD 
1020 
103G 
If^D 
^050 
HiO 
1*70 
1030 
10^0 
IJOO 

tno 

1120 
1130 
1340 
T150 
IliO 
t1?0 
tIGO 
fJfO 
1200 
1210 
1220 
1710 
12^0 
1250 
1260 
1270 
12S0 
12?0 
1SO0 
1310 
1310 
1330 
1340 
13^0 
1360 
T370 
T300 
TS^O 
ItOO 

rqio 

T420 
lOO 
1440 
S450 
1460 
1470 

i4ea 

14?0 
1500 
1510 

13:^0 

1^30 
154Cf 
1556 
1540 
1570 
15^0 
1190 
IbOO 
1^10 
1i20 
1A30 
1£40 
U5U 

1470 
UBO 
U90 
1?00 
■ MO 
1?Z0 
1?30 
1740 
]^50 
1?iD 
1170 
t?80 
P?TO 
fBGO 
IfllO 
1820 
1G30 
IS^O 
tS50 
IS^O 



<flpC?ipfffpCT-0+B 
SATD fSO 
^[RtC^'1 

jie?:t C 

HEJ^T R 

BEil TEre TO PLfiT BACK THE TRIAHllLE UlTH AN AFtTISTIC FLARE 

IF D03 TJIEH 1070 

LET T^T<-2-] 

FOR R = 1 ID T 

FDR C^l TJl 7 

IF P^RpC?=0 THEN M 30 

IF(P<RpC5/Q-INT<PCFlpC5^0>J»9^.?5 ThttN 1130 

PRIHJ T»; 

GOTO 1140 
PRINT St; 
'EVT C 

PRINT 

ItEJ^T R 

[F LEFT»^R5*p1 J="r' 

QfllO i7i; 

HEH OPTIQ^r 4 LIFfES 
TIHE TO CREATE 



THEfl 32i0 



REH 
Z-T 

REH 

LET 
FGR 
FOR 



12T0-H9q 
flntt PRINT 



A flOUBtE PIECE OF PA^fifiT 



^UILL TI^E UPPER LEFT RA4IB CQRNEi^ HF THE AR41AT 

J* -I 

j:=i IB fl 

C"l TB Z-1 
[F (R-U^rc-Tim TtfEFf 1310 
P^iTpC? = P^R-1pCJ4PCRpC-1 J 
[F P^R^CKG^QtQ FHEN 1120 
Ptflpf:J = P(FrpCJ-B*Q 
BGTQ r2Q0 

[fEKT j: 

Z=Z-1 

NEXT R 

RECi BUIiH 

I-H 

ff=Z 

FDR 

FOR 



THE LUWER RlBHT HALF DF TKE l^RRAT 



S-: TB T ^TEf -I 

L=7 IB fl STEP -1 
[f CJ;-JS*[C-i>-0 TIIEH 1450 
P^RpC? = P^RpC*1 J4P(R+1,C? 
[F PiR^CKOtQtQ ^K£N KdO 
P(fipC?*F^RpC3-Q*C 
OGTG 1420 
P^RpCHI 
NEO C 
N=«+1 
fiitJ R 
OGTO 107fl 

REn rlRFJPNS 5 M.U 4 LlilES 150fl-212fl 
ri=Q 

REn BUILD THE UfPtR LEfT CORNEJ^ OF THE AEjRA'C 
T^T 

Z-IlfT(r^2) 
B?-Zt2 
J1=I 

:2=:it 

14=13 
M=X4 
FOfl r^l ID ZJ 

FOR J-1 to Z 

If U-1>*a-1^=0 TflEJT 1651) 

papJi=piE^j-i]+pa-ipj? 

If P[IpJKB*ffta THEtt Ii90 

P11pJ3=P1ItJ^-9*J 

SOTO a^Slh 

Pn^J>"1 

NEXT J 

IF a=d THEN 1 720 

Z'Z-1 

NEXT I 

N=Z1 

REti iUILlI THE UPPER RIGHT CORhEE^ QF THE ARRAT 

FGR 1=1 TB Zl 

FOre J=T TO I5+I STEP -1 

IF 1^1 ThEir 1S3tt 

TF J = T THE*! 1B30 

PCIpJ?=P(^J*n-^FC["^J^ 

IF P^EjJKfltatB THEN 1G40 

PCI,J^ = PapJJ^9*0 

DQTO IGOO 

P(IfJ?=t 

l#EXT J 

LF Ui4 THEN 1S70 

X5*X5+1 
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hS7i} «EKT I 

IB^O aEh ffUILD JME LQUER LEFT CQRNEfl OF THE ftRRfif 

1^130 FDR I = Y TD IHt-l STEP -1 

1^10 FOR J^l TO I! 

1?2q IF >1 ThErt 1?S^ 

191(1 IF I=T THEN 1?QI> 

1?5D If PCipJKB*fl*a JHEK 1??1> 

i^fiD f LIpJ^=fCITJ^-a*s 

t?7D flOTO 1?5C 

1*Bi5 fCIpJ^"! 

1?10 HEH J 

3fll}0 IF C}=fi rtCfci 2fl:2^ 

2D1(i 12^12-} 

SD:^ HEIT I 

253(1 N=Z3 

20*U PEPl BtllLO THt LQUER flJDttT COHHEFl Of THE flRHAT 

205& fDt 1=1 Tfl *tt] giEF -1 

20iO FOIr J"^ 10 ZZ41 STEP -1 

2(170 [F J = "r T«EH 21J5 

:]D80 :f i°t TuEn 2i30 

?10(l IF FCIfJKQ*(]»(] TH&H 2t40 

ztn> p^EtJ^=f cirJi-fl*fl 
J[21| flOTtt 211315 

?I3I? fU^J> = l 
2MII [fES;V J 

2155 IP IJ"i THEN 217D 

21i0 Z3iZJ*] 

:^i?o KEl^r I 

2180 GOTO lO'D 

:]|?0 REtl fA^PORn C OI^TIDN 2 LINES Jt3lJ-2Zdi> 

^250 FOR R=t TQ I 

221^ FOR :■! TO T 

2220 IF OR IHEH Z'iK 

j:3D If CC-n^* THEN 22?e 

22^5 IF R=i: THEN 37^0 

JJtiO LET f CRpCJ=PCfi-Ui:-MfPCR-tpJ:] 

22i0 IF PlFf^C]^a*Q*ll THtN 23U0 

2270 LET FCPpCJ=PCi:pJ:J-(liQ 

2280 b^JQ 2?6fl 

22?0 LET PtftpC5=l 

230G NEXT E 

2310 f^ZXT R 

2J?0 GDTQ 1045 

2330 CEM PfiSF'ORH A BPTIOif J LfN^S 22?0-2480 

2J^I^ IF T<^3i THEN 23?5 

2350 FftINT ^n*X. OF 3i RDUS liLLDUCB U]TH THIS OPTION, , ^ME RE THE! CJlflE" 

2JiO LET TiJi 

23?0 LET fnprh = 1 

23B0 FOB JL=2 IB T 

23T0 LEI t"T 

2^5fl If C>Tt:2-1 THEN 25J0 

2^t(l Jf Ri-C=Ti-( THEN 2170 

Z^Zft If C"1 TiEff 2495 

2^30 LET PfRjC3=P[R-l,C'1 J-+P(f!-T|C+11 

2^40 ]F P[fi,CK0lO*(I THEil 2480 

2^50 LET PlR,[:3=f [RpO-a-rQ 

2140 HOTO :i4g 

24?0 LET FrUpEJ^I 

^*ffO [F R + i:<T4l THEN 2510 

2<?(i LET Ca[*; 

255(1 GflTQ 24(10 

21E0 LET D=C+1 

?525 G5T0 245C 

?S3& IfEU R 

25*0 &DtO 1040 

:^550 REH flPTTDJI 7 LTHtS 2510-1190 

23 ?0 If Eh PUS HE E THE fittUHBflfilES UAT O^T 

'IZ^O REN «OTE TttE PRflTECtlOH *llfiItJ9T THE FlilE OUT PRBBl EH JltJ UNIV IHO 

^1^0 Pfi[*IT "klHflT 4IILI B£ THE CDaftEUHfilES <9i,L} Of THE JPFEff LEFT CORNEft 

2650 PRINT "flf THI5 5ECTIDH"{ 

'ih\<\ I^PUT Rl^CI 

2ti2D LIH R^050^CM50O3 

2ft3D RLPI f*f T'TinCl? 

2^4G FDR L1=1 TD ?2:F(IR L2=1 TQ ?ZtP(L1 f L3>>0lNEAT L2lNENT LI 

2i35 FBR LjTl TQ I OOO: RCL^J =1 :C1L2J-1 iHEIT L3 

2675 IF R1=] THEil 27B0 

2&fi5 f5f! R*2 TO fit 

24^0 FOK C = 2 TC Ct-f72 

J?00 R(C5 = R<i;j+-RLC-l> 

??10 IF R{CKfl*Q*a THEN 2740 

2?20 Ra]iR(Cf-fft:fl 

2730 GOTfl 271 fl 

2741] NEXT C 

275U REM **• TF TIB(T>-T<4 THtll 277t 

27£5 GDSll£ 3210 

2775 tfEiT ft 

?^e5 IF i:i=l THEM 290Q 
2795 fOft C=2 ID CI 
2001? C[tl>iBIC) 



2B10 FuR flrnffitr TO fl]+73 

JB20 C^Ri-^ClRJi-CCR-l) 

3130 IF r.[RKB*fl+e TJtEH 28i^ 

2H40 C(RJ^C^RI-Ot:a 

2R50 GOTfl 2B30 

25ti] i^tKr a 

2E^5 KErl =**■* IF TIH-.t?-T<i THEN 2a¥0 

2SG5 BDSJ£ 3210 

2fi95 ItEiT C 

2?1^0 FDir C^l TD h*2 

2910 PMpCJ'RtC^Ct-U 

2920 P1Cpn-C<C-fR]'5^ 

2?30 «£KT C 

2»40 fOR R=a TO 72 

2955 FDR C=2 TO 72 

?*A5 P(fipC^=?(R-^C^+PCR,C-l) 

29^0 £F P^RpCKQ^atff TJ^EN 3000 

29B0 PCKp£?*PCfl,t?-5=ttf 
^P?0 UOTQ ?^7fl 

3 POO Hi XI i; 

]DtQ REM *:*+ IF TlJinJ-r^i THfK 1035 

aa?0 GOSEJB 3215 

303(1 N^EJ^T R 

3540 eitSUB 3211 

3*50 PiriHT 

3540 FRJ^I 

3t75 fOl^ G=1 TG ?0 

3030 FDR C=] IQ /O 

36^0 IF (PlfipC^^B-IRTCP(RpC?/DJ5:tR<,?B TNEH 3l2P 

3100 PRINT T1J 

3110 liDTD 3130 

3120 PRINT 5*i 

3130 NEXT C 

3na REM *:** IF TIH(1]-T<ft TiEH 3Ufl 

315(1 G5SUB 321 & 

JE40 PBlt!T 

3^70 jiej:t R 

JJBO PltlHT 

3190 PRINT 

3^3D &GTD ^170 

37K PPCNT " -; 

3220 REIt *** LINPtlT At 

a:3fl REh f** T=TCH<E) 

J240 RETURN 

3150 Ooro it;5 
32&5 tie LALENUAR 

3270 tEI 1-T9 

3290 8E)1 LIMf? :S^IO-3340 PRflDlfriE A GALEIfHAR 

3290 RE*I PRG&RAM ES A SUBRUUTlHE TUftl OSES UAflIA8LE X'JEllll-Of -CflLENftfiR 

3300 REfl 

3310 C=i 

3320 FDR J=1605 TO X STEP 1 

3330 LF J^X T*JEN J3?fl 

3140 [f J/4 <> IWr(J^*l rWf* J390 

3350 IF (J-1750mJ-iaOD)*U-1?(l5^-KJ-2KOJ*U-:^250:t(J-231]0^i0 Ttt£N 33BE 

3340 e=C+2 

iJ75 GBT5 33¥5 

3395 C^Cia 

3395 IF C<7 THEN 3415 

3405 C=C-7 

341 ( J1EXT J 

3120 PSTHT 

3^10 FOR R=1 TD 12 

34^0 READ Al 

3^30 PICEJIT TliBa7];flt|" ";t 

3445 READ B 

3475 IF f,/i O ir*H;^,'4? THEN 35fl0 

3495 IF Af <> "FEDROART" THE41 JSOO 

34?5 LET B-BtP 

3505 lEEtt TINE TD PRINT THE CflLENDUP FOft THE TEAP T 

3^110 PRINT " x,,= ======.=-=i==±===i««3==:;^- 

■ 3520 PRINT "'SUN MGH TJt UED THLI FRl 3ATr 

3540 FOR t=l TO E 

3J50 F8E8T TABU*i:^;P; 

15611 LfT C°C + 1 

3575 IF i:<7 TMEI^ 3iDD 

3595 PRINT 

35?0 C^O 

3iO0 BEU B 

3610 PRIMT 

3*30 FOR P'l TD 3 

3H0 PRINT 

:Si50 NEXT P 

3d40 NEXT R 

3^70 DATA "Jfll#UARY-p31,-FEBRblWT*p?a.^naPtH"Jl,-AFRIL\3ap"HAT"T3] 

34BO DATft "JtfHEMI?,-JULT-p3l^-ADEUST-p3(/BEPTEflBER"p30p"GCTaBER*,31 

3495 DATA "NOVEHBER" p30p "[■EtEltBCR\:S1 

3790 RER TRE EilD 

3710 ENH 

01. 
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Pinball 



PfNBALL IS, naturally enoughs & 
simulated pinball game— com pleie 
with beltsif your lermlnaf has fhem^n 
which the computer serves as tJie 
pinball machine However, you don't 
need any quaners^ The program Is 
divided up Into ten small routines 
contained w^hin the whole Each 
subprogram performs one task in 
simulating a pinbalf game. 

Details on each task/subprogram are 
as foliows. 

1) StarUng and monitoring the game. 
This (ash is performed by the master 
function PINBAL, which is contained in 
lines 1-SOO of the program Pinbafasks 
if the user wants instructions or a 
picture at the start of the game^ puts 
each new ball into play^ moves the ball 
unlif it comes into contact with an 
object on the table, and tells the user 
when he is finished and i( he has 
broken the table record. 

2} Printing instriictiorT&. 

This subprogram is on the lines 
numbered lOTO-1999, and Jts rnajor 
task is to print the Instructions of the 
pini^all game and then to branch to the 
picture program to print a picture of The 
tabi© [see below) After the picture of 
the table Is completed, this subroutine 
explains the function ot each figure on 
the table. 

3)Regl5lflring "hits" and compuling 
new scDres. 

Lines 2010-3909 are In charge of 
faking action each time the space 
occupied by the ball on the table Is not 
blank- These lines also prepare the 
tabfe to take action on the next task, 
namely flipping the table's flippers 
when ihe bail approaches them. 

4) Flipping the flippsrSn 

This task is accomplished by the 
Imes In the four Thousand range. These 
lines also set up indicators for the 
monitor routine (1 above} to put the 
next ball Into play pf necessary and 
branch to the routine that adds bonus 
points for tags {letters A-J) knocked 
down dunng that ball's pla/. 

5) Bonus points at the end of a bslfs 
play. 

Lines ]n the five thousand range 

handle this task and then branch back 
to the monitor routine to put the next 
ball into play. If all ten tabs are knocked 
down in one ball, the program Im- 
mediately awards a bonus of 250 points 
and an extra baH to the player and 
resets the tabs tor further play. Normal- 
ly, bonus points areawarded at the rate 
of ten per tab at the end of a balL 



6) Prmling pictures of the table. 
Lines in the six thousand range print 

a picJure of the pmball table, either at 
the beginning of play or randomly, at 
the rate clone picture tor every twenty- 
five "hit£_" 

7) Bouncing Ihe ball oft bumpers and 
the jackpol. 

The ball is "bounced" by the routine 
beginning at line 7650 

8) Initiali^fng the table. 

The table ts initialized at the begin- 
ning of the game by lines Jn the nine 
thousand range. 



Suggestions lor improvement and 

change. 

1) Change the table as you wish by 
inserting or deleting bumpers. 
Jackpot(s), gates [numbers, now 1-9 
and 0), etc- You may also move Ihs 
positions of &r\y item on the table 
excep] the three flippers. 

2} Program in new sorts of table ob- 
jects. 

3} If your system is so equipped, rig In 
the program with some synthesiser 
music to heighten realism! 

Pinball was conceived and written by 
Donald-Bruce Abrams. 



PW 



FIHSJILL 

CREATIVE £Qrt?tJT]H6 

flDF|t:5TDltflT HEI* JERSET 



UElCflfiE TO DOi^FUTEft PIH^ftLLH 
Ul>lJLD ^DU L3f:E I N£ T RUlIT I Gl4S TQ 

Fi^TASTic 6flttE^ tea 



Ti^JS 



THE fllJLES CF CaflPI^TEF PIWBIiLI- ARE FftlftLT SIHPL£. ^QU GET 
FII^E EALL^. If Tl^L^ £CMl HDflf THAN I^DQ^ ^OU &£T H SUTit 
Y[}IJR SI3: SALL StQflE IS WORl TliAil 221)0, VI>U (SET A SfliEJllH I 



A TfllAL OF 
BALL* [F 
ALL. 



iltlS TAflLE HAS THREE FLIfPERSt EACSt Of OF WHICH PROTECT AH CUT CKUTt. 

HflUfUEfi, TKT5 SIT ffJfFEJrS FROJt OTHER BETB, S]HCE lOU fljlT Oi^L^ FLIP 

TlfD BF THC FLIPPECS AHI TIftE THE BALL APPROACHES THE CHUTE. 

NQTA EEffE: TDO BO NOT! ■ ' tlNOJf FQR StJfrE ItHERE THE BALL ISi ■ 

SCr If TOl! FLIT- m lfHD*l6 TUO Fi.[PPES5, TDIT LKE THE BALL. ftHIf TWE 

NEXT Efii_L 13 PUT IlfTO PLfil". 

TOL^ CAN GET A PICTJJRE Df THf TaSlE l'^€^^ ?lliC IHf £ALL. HITl 
flif OffJEtT, SD THAT flAr fiELf VBU SOflElll*fiT. ALSU, TOL" fiFTE lOLB IfHERE 
T«E &flU IE EflCJJ TIri£ 3T HlT5CEt"Ert [f i^l' HON-" CliT A PlLTUftliJ . 
TItERE IS SOHE S.DGIC TO THE CHQ'fE OF FL]^P£R$h BJ^ ^Ofl^ lU^IL TS INL'lfL'J£S, 
THE F"LIfFER5 AHI tflFflffEREB 1^2, JiHB I TRflft LEFT TB RIBHTp A«B AKE SHJIJJH 
on TilE PICTUJJE BELBy AS ^^' *IAR*:S. 

SINCE LUC*: PLAYS flIfLV A SnALL PfiftT I« CHOOatril] THE fOPlRECT fLIfPER. 
^nU HILL no PCHJIEE-T If TffU JUil flUE5& tfHUH FLlPrtP IHE BALL J1 
KEAI^EB TQLTAeti.^, 



TrtE TflELf LD0f:5 L!Kf tHl;: 



TBQ. 



SDIBfltPITBII 

B 

CF * * * 

A B C D D 

* t D 

4 * ^ * 4 Q 

d ? r C 

CF^ E F B H *0 
G * * * 

0=== ===Q 

12 3^5 e 

S? i i ^ 5 "^ J 1] 
^^tii =^ = c 

C C CO 

Ml I h I 

CI \ / 

fl \ ] J .' 

Q \ / 

I? \ / 

\ 1" — "-/ 



128 



fHE CEhTEl^ S^HF 
THE 9J4LL S^ PUT 
^RQUNDp UH£.RE: I 

-SUES QN THE BI 
If THE TABLE, 

FLIPPER5 A 
TIE BALL lAT QO 

IH UHICIt £ASE Y 

■^5 THE LETTERS 
A MLLp AilB IF 



E(:<5J IE THE JAEKPBT" 

IHTfl PLAT THEOUen THE UP ARJ1ULI[-^^ AMB GDEiJ UP AH? 
T 15 CEFD5IT£II DH THE UPPER JIALF OF THE TABLE. THE MLL 

THE 51K OP THE Tri^ftLE, AND ilAY BDUnCE UP ^RDH THE 
BEf = } AHIi FRDH THE ITftGQtiALBiV AiHB /? AT THE BaTTQN 
THE BUHfEffS ARE IHDECATEC ffT STAKB^tJ, 
RE SHQUH AS E J! ITLAMA T I DN PaiNTB<fc DR 'i). 

OUT OF PLA^ IHFOUDH ONE or THt FouPt HOLES 1^ THf lOARlKD)^ 
aif UILL GET A BflMUS SUT LOSE THE £ALL. 

SHOiftr Br rut vuhbEKs t-?^ amp j^hqcm-iiqun tabi are swohh 

A-J. 7DI GET A BQHUS FDR THESE liT THE EflD DF 

TDU KHOi:^ ALL OF THEtl ^iDUef TllU OET A SFEClAL BDHUS.,. 



»**EL'ERT ONCE IM A UHILFp I lITlt EHOU rOU A FrCTTUK OF THE 



THE »AIL 15 


NOLI 


AT t 2 


V 11 


K 


TDU RECEIVE 


f5 


FOTITTS 


FRDH 


THE 


SGOKs IS 











EiJMPtft AT 5 ^ Ifl . 



TAB H OOJIN... 

VOU fiECElwE a P0£K75 FUDM THE BUrtpEff flT i . H . 

BCOREi 23 

TDU RECEIVE 12 POUTS FEDfl THt flUPlFER flT ■ fl t 8 . 

^CaftfT 35 

BALL APPfiDACHinC FLlPfERS- EJITER THE TUD FLIPPERS itV UTW TO FLIP 

IN TH£ FORJI: X^r ? 2^3 

THE BALL [5 HDU AT f 7 p ICl K 

Tei RECEIVE 5* PDIHTS FRDfl THE BUHPER AT 7 ^ tO . 



TA? H BDUH..» 

'SO! KEtEIVt 3] FftlHTS FROM THE BUHPtfi AT 9 , 11 , 

£UIHEf ]Z&J 

fOU OET 4Ch POINTS FROJI DATE 4 
SCOPE: 13« 

BALL APPRDACHING FLI?PEftB. ErfTER THE JllO FLIPPERS TOU llf5H TO fLIF 

IJt THE FDflH: lipT ^ J^3 

THE ?ALL IS NOU AT ^ B r ? )h 

VDl* RECEIVE 2A fOIKTS FRflft THE BLIf^PER AT 8^2. 

SCDRE: ^^69 

10U RECEIVE 37 POINTS FRJ3M THE QLiitPER AT 9 f i . 

i£lH!E: no* 



TAB A Hirilif... 

fOU KT 45 P0IHT5 FFDIf SATE 2 



TAB F nUFf... 

TDU RECFTUf 10 fClttTS FHOfl THE BUflFER AT 9 , B . 

SCORE: l^&] 

BALL APfRflACHIttG FLIPPERS. ENTEff THE TUO FLIPPERS TOU UISH TO FLIP 

rN IHE fOfifl; i^i » ip^ 

THE BALL JS r?[HI AT C 3 1 i J, 

TDU RECEIVE 15 PfllWTB FRDH THE BU*I?ER AT i p 3 , 

SCARE: ]I76 

TOG RECEIVE ^9 PDIWTB ffiOM TJlE fUHPtS AT 3 ^ S . 

SCBRE: E3^S 



TAB t Mun,., 



TOD BAB... THU HflUE IjD«£ STlfflEGHI HUT A CHUTE HOLEE^fl-' ON THE TABLE?. 
TO CIWSOLE Tl>U. ] VILL OIVE TDU AH EI^TRA 

13 PQJHTSp TC BRIMC VQOR TEITAL TO ^:M ^ 
TOti «3U HAVE HAVE 1 BALLS LEFT. 
^DUR HALL XNOCRED BOUM 4 TAJj^ M 
FDR TrfIS STELLAR PEfrPClFrMftNCE^ lOU ARE AVARBEB 

aCDF.E: 157e 

THE BALL TS ^DU AT C 2 , TO J. 

^OU GET ?5 PUINTS ffiOM QAT^ i 
Bi:BF!E: 14^3 

TOU RECEIVE 1 PttlffTB FMtl THE BJHPER AJ ? , 10 * 

BDDUE: 1AS4 

HALL AFFRDACHLNB FLIPPERS. ENTER THE TUfl FLIPPERS tCJO UISH TQ FLIP 

JH THt FDRft: K^r T 1,2 

THE BALL IS HDU AT f 5 p 10 1, 

TOU RECEIVE 5 FIUMTS FRDfl THE ELOPER AT 5 ^ tO . 

BCQUE: 16^9 

H — t^«r£ 




LIST 



1 
2 

il 


^ 
ID 
2» 

JB 
35 
4B 
4!i 

4h 
3B 
,"55 

AD 
d1 
7( 
71 



PR[ilT TABC25];-PIilBALL" 

FR£*|T TAB[2B?rCRErtTIVE COHFUTINQ" 

PRINT TABUS ^;"MflRR]STDUN^ i^U JERSEY" 

PRrNT^PFrltfTiFfilNT 

DEN R»^O^PI420]pLC^) 

A1-fliAll=0:K?=D 

PfflilT -HELCOHE TO CUftFUrER PIHBALLlT' 

FltE*ir "UflULD rOl LIKE IflS TRUE T 1D«S TD THIS ^^ 

PRIilT "FANTASTIC EAHE'; 

IHPlJT DtilF lEFTHntTU-"f" THEN GllSUB lOtUifiOTU 3CJ 

FFrmrfFRINT "HUU ABUUT a picture DF THE TABLE"; 

EJtPUT fl*:IF LEFT*<fltpl]=*t- THEN BOBUB iOlff 

PCENTePRINT^B-S 

Tt = "AEEEJ£FGHlJ-;PRTHT 

FOR Z=1 TO lt:l»{Z3 = '^ *:NE1T 7:Z3=0 

A1=C 

A7=Cl 

8C IF i<=i THEK 79i 

100 LC1^ = ?+-IHT[RNBci]:t^J:Lli> = Irtl(RttOn>*14)fl 

tlO C = ]+IilT<RN[K1?*73:A]=D 

120 PRJ*#T -THE BALL IS Mm AT C^ILM J;"p'*;L(2»i"]." 

130 IF «JBHPl(L(t3^pL[2?^n^' "TJtEW |^D 

HO tiDSup ;oio 

150 IF A7^7 THEN SSD 

UO U Ara^ T^EH 180 

170 HDTO 26^ 

ISO LCIKUJ^f 

1?0 flT-0 

?<iO L(2J-LO>4lNTCl+RND<iHJ^-? 

21(1 IF Ln)<2 DR L(2]>T5 THEN L 1 1 ?=Ln 54INT H *RHBit ]*3)-2 

215 IF LC2?^£ DR H:?:^!! TttEK Ll^^■=l^fT(:^-RHC(t 5*13 J 

730 IF LU5>=2 AHB Ln^<=20 TJdEM OOTD 130 

2« LCn = lNr[1fRWBaJ*7l 

250 EDTO 130 

2^0 SQSOB 4£lH 

2^0 IF flO^E THEN «0 

2S0 UN K?n BCTD £Cp340 

2B^ ^nm-IQU iCAVE FLATEIi TDOR SF^EtfTH BALL ANH ^COE^H ';Pl- PLUNTSI 

2ii PRWyrOU'ltE VEFTT GOOD'-;eOTO 9T?? 

3?0 FR]«I ^^QU NAVE PLAT EL TDUH FIVE BALLS^ ANB HAVE SCQREB" 

2U PRIflT -^A TDTAL DF ';P;" PaiHT&." 

3M IF P-ilfiflO THEN 9??9 

3« PfiIi*tTPF!r*IT "*:** ROtfUS BALL **** 

310 ^=Bt| 

320 XT^l 

330 OOTO fiO 

3q& PRINT ^VDU HAVE PLAVEB TDUE? SJHTH BrtLL fii^D SCDREB ";P;" fUIMTS"' 

3^1 S9=2 

350 If P<J200 THEN 9VM 

3S5 FRIHTtPftlKT '*tt BO If US BALL m" 

3fiU D=B*1:S=3 

a'U SOTO ftO 

3H0 DDTD 2010 

390 SQTO 150 

IflO L(1J»!*INTCR«E{1)*?I 

405 LC2? = 2*INTCRH»11J*13]:K=U:"^HJ 

^M liQTO 110 

IDTff PKINTiPRINT 
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D4D 
QqS 
Odd 
fl70 
OB{i 

G?J 
UTS 
W? 

:?? 

ICO 

SID 

120 

]2:i 

I2S 

(2? 
131} 
141? 

:3i5 
2*U 
73 U 

27 D 

2flfi 
295 
250 
30C 
31 C 
320 
330 
340 
3J0 



PfllHT "THE RULES QF rOMPi]7EP PEntiftM. Pi^E FrtlRl-f IflftFl^L. TQU 6ET ft IUTAU OF" 
Pl:[rtt "fryi BULLS. IF fflli SCJIRE HJIRE THflJf 1600^ "TQU GET fi SESTJI BfiLL. IF" 
PSlsr "TfUi: il\ BALL 5CU^E 15 hORE Ttffli^ 2200, TOU SET A SEyENTH BALL." 
P.^[hT":PfiINl "THIS TftBLE JIftS THREE rLIF:^ES:&, E^EH OF QF {JMICN fRQTECT rtrt HUT CHUTE." 



PRLHT 

PFLlhT 
PREHT 
FRlflT 

PRIflT 
PRINT 
F"RiNl 
fRINT 
PRINT 
PRINT 
fRINT 
FRINT 
PRINT 



"HOUiVlfip rHL5 SET DIFFERS FFLOri OTHER SET3^ SEilCE TOU HAV ONL T fUf 
■TUQ Of THE FLIPPERS flHT TlPif THE flfiLL flPFHOACttES THE CHUFt." 
■"ilDTil BEttE: TOU M «D" ■ " KJfOtf FOi! SURI: UMEFTE THE HiILL i^'!" 
^SOp If SQU FL[P tHE UKJING T«a FLIPPERS^ VDO LDSE THE EAJ_L, AND 
■ilEJIT BALL rs PLT INTO FLflf-" 

TOlf iHN e£T fl PlCTUftE OF THE TftEiri EVERT J^HE THE SrtLL ^3T£" 
■ftN DBJE^ 
"THI BftLL 
THERf IB 



THE" 



30 THAT HAV HELf YDU SOhEUtinr ftL^9, TOU Mt IULD \fHiHl" 



15 EACH TIIIE iT HIiatEVtH IF tdn DOrf'T SET A PICTURE)-*' 

BOttE LQOIf Tf THE CKDICf DF fUPPEfiSp BLH Sflffi LUCH TS INyCLVE&T TflO." 



■THf FLIPPERS ARE HUHBER£Ei 1,2^ A^S 3 ffifltt i.EFT TO EIEHT^ AS^S YlftE SH^UN" 

^D*l THE PICTURE fitLflU A^ ^T HBRHS.* 

■BIrtCt LUCH PLAYS D*ILT A g«flLL PiftT IN CMCIBIIIG THE CQHRECT FLEPPERt" 

■TOU 1*[LL BQ POCfiLT IF lOU JUST SOESS UNiCH FLlfPl-ff IHE BALL 13" 

■HEflDEB TOaARO...":fRIHT-PRINT:PRINT"THE TABLE LQOlTS LIKE THIS:" 
->4+*4**t:t«*v^t:*":?RIj(T.pg|yj.foj; z = 3 T D20 1 PR I N F P^ C Z J I riEJ! 7 I 



PRINTiPRIHTiPRINT 

PRINT 

PRINT 

fRINT 



-THE CENTER BUflPEJr^l^ IS TH:i JACHfOT"*- 

"THE BftLL IS PUT IHTO Pi flf rHRllLJBH THE 4JP AEIR[1U( 

-AROUHS, UHERE IT ES IiEPJJSITEIl QH THE UPPER HK-F 






AND 

THE 



I30E3 JIF 
TABLE. 



AHB 

TttE 



fflLL- 



PRlf^T 
PRINT 
PRINT 
FRIWT 
PGIIIT 

f:vl«t 

PEIMT 

ptEHr 

PSlilT 



"KAT BOURiiE FHOn THE SIEiE UT THE TABLE^ AHL HAY BQUNJIE HP FRDK THE" 
"Ll!:ES UN THE 3IIiEC = ^ AND FRQH THt :JTfl3CNflLSC\ ANE /t rtT lH£. BOTTQfl" 
"Of UE TAffLE"r TJJE SUHFERS AHE [H?1CATEE £Y E"rARSC*J." 

FLIPPERS ARE BHOUN AS EK^ftHftTIUlT HUll^rBO OR M^. 
"T«E BALL HAY ED DOT OF PLflr THROUGH OWE OF THE FOUf HGLfS IN THE BOftROtO), 
"Efl ynjilH CAHE TOU H31L &ET A BOHHS BOT !.OSE THE BALL," 



TAB C EUUH... 
YDU RECEIUE 9 

■JGOHEi J3A4 



POINTS FRBJ1 THE fflJHPER AT £ 



14 



OAff^ ARE SHOi^M B'i THE NUHEER^ I -f ^ AND h^NO^^K-iiULJH TABS ARE SHDUH" 
■AS THE LETTER! A- J* TOJ 6E1 A Bt^lUS FOP THESE AT THE EflU Df 
■A EALLp fiKE IF TOU tiftOiK ftLL OF THEH HOk'N CChU GET A SPECIjIL EONLiS..." 
PllfttTlPftlNT■t^*Ev£^V UHLE :n a «HELE> i URL SHOP Y|JM A PlETUIfE OF rwE" 
FEItfT "TABLE AS IT KIT3 SDHETH 1 MO . THE EALL I? ^HOUH AS THE #." 
PfriHT:PB[NT;F:ETHRii 

2*10 IF H]D*<P*a<l))jLC?l^l|-**B- THEN 2O?0 
IF INT(RN[in)f.?>>:)l EHErf 2022 

IF HI^^<p*(^.1^^)^L<^^^^)■■v■cRllIDi(Pl(L(^3^LC2^l?^■^■■ theh siio 

SGFC^T^'TNDn ?«jf1) 

FDS S?-1 1D SS = FIIINT ^HI!}l7);iHE):T S7 

IF NlD»lPi(L1lJ)^l(^3^^]<■"J"A^^B fl[DKPf(L(IMpL12),l)>=^"fl" T«E« 21^0 

dDSUB 3010 



THE Ttfll FLIFFEHB YHtf t^IStf TQ FL[P 
BUtiF^R AT ? , £ . 



TAf H 1>01I.4... 

Bj^LL AfPHDACHI^G FLIPPERS, EHTER 

IN THE FORH: i,| ^ 3»3 

THt FAi.L 15 HCU AT C B ^ ¥ )- 

TOU REJIEI'JE J2 P0Ertf5 FFrDU THE 

3i:0RE: lfi9i 

TflU flEiT 60 POIWTS TPM GATE S 

5C0RE: 175fi 

EflUL fl?FftCiii;ilINa FLIPPERS. ErtlER THE TUfl FLIPPERS 100 UUH TO FI TF 

IN THE FBRfl: 'A^l * J^J 

THE EflLL a^ ayii AT t 5 , 3 



TOU RECEIVE 
SCORE: iSlS 



5? POIKTS FROH THE EOHPER i»T i , 3 - 

THE TUa FLIPPERS ^m UISH TQ FLIP 

THE TtfO FtrP^Efl? VO(l U15H tQ FLIP 



«i=iLL APPI:0A1:HING FLEPPESS* £HTER 


[N THE 1 


^BRilt ^Y T 1.3 


THE BALL IS NOU AT ( A , 6 7. 


HALL flPPROACJIlNO FLIPPERS. EWTER 


IN THE 1 


-BRri: K.T T 5-3 


THE BflJ-L 13 ifOU AT C fi , 12 J. 


TOU GET 


S5 POJNTS JRO^S &ATE ^ 


^COflE: 


1B2B 


TOU GET 


6(y FDINF^ FROri OA FE 4 


■iCOCE: 


IfSB 


TOU OET 


?Q PDlHI^ FKO.^ OATE 3 


SirOfiE: 


1^?B 


T3U OET 


4^ raitiTS FROH SATE J 


SCOfiE; 


2U;3 


Y5U SET 


15 POINT? FROH liA FE 4 


5C0JiEi 


204B 



BALL APPRDACilINO FLIFPER3. EMTER 

IN THE FORM: ^Y ^ 1+2 

THE BALL El «gu AT ^ 5 , M ?. 

VQU REtEIUe 53 fOIHTS FBOM THE 

^COIIE: 2121 

TOU RECEIVE 32 PflI#TS FPOM JHE 

SCOIIE: 2133 



THE TlfO FLJPPEfiS TfliJ IflSH TO FLIP 

BJJHfER AT fi , 14 . 
BOHPER AF ^ ^ It . 



2*10 

202 T 
2022 
2«23 

2040 

2070 
20?3 

2090 
2E0O 

2iao 

211) 
2120 
3130 

2Mi; 

2150 
2UV 
2170 

2I?0 
220 1 
3Hi 
2204 

2205 
2210 
2255 
2240 
22?3 
3010 
J01S 
3017 
101 B 
301? 
3020 
30 JO 
30qO 
lli^O 
J&iO 
JP70 
3DB0 
3^?0 
31P0 



HFTUFPH 

PRDiT ^TOO BAB.,, 

fRINT '■TO CBNSOLE 

B^lNni^^ti^|}*1<1] 

F=Pt-Q 

Q;- PDIHTS, 



TOU Hfll'E QOHE ST^ftLQHT OUT A CHUTE 
TDEJ, I UlLt SlVt TOU fiH £iTRfl" 



TO £flIHQ TOUR TOTrtL TD -iFr. 



HGLErO' Gi^ THE TABLE). 



■THl MOU HAVE HAVE "^B-l;"^ BALiS LEFT." 



5010 



PR3«T 
FRINT 
B=B-! 
A?'? 

Bosur 

RETURN 

L(n^Ln5 + [HjHTfRN?C1fMn-ri4IPJT^RHEn?:t^3 J 

LC2J^24lNT(BNEll)t:a4) 

FlETURR 

PRINT 

FOR a=] Ea 10 

IF R1{fl?=H[D4CP4{LM))pLC2^n THEH 2273 

HEJT U 

Z3=^J^-1:P*c^i5=l1ID^[fta^^JpL12^|n 

FRINT:PftIttT "TAE ";R*<Z33;" DOtW.,-" 

IF ZJ'10 THEN OO^UB 5UtU 

AETUSK 

RE TUG H 

IF HIB4(P$CL<S^}TLI2)r1>-CHtiCB3 THEN REEURN 

IF niBHP*CLnM,L(2]pt)-"r THE^ RETURiT 

IF H101<P5aMn+L(3]pTJ-'^E'^ THEi^ 

IF niO*{FKLUM,L(2],1l^"^" THEN 

A1=D 

[f HlpifPiadM^HJJjl)-**:-** THEN 

C=C-1 

IF C=0 THEN 3ltO 

[F niB*CPtaMJ],L<2lTlr = ORHIB*fP*(L(1)5^Lt2 5,n=-V 

IF MIBJCPtCLU JJpLi2JTl^ = "/"0fi*ltB*(PirL(1)^L(2M)='-' 
[F lJ^T^E■♦frHBC1?*^5J=■^ THEW SOSUE frOlO 
[F MTBUPjaU J],Li2},l) = "t" THEN 32JO 
[F niBJCPJan?lTl-i2),1k = ^l:'' THtB J2U0 
COTO 3320 



PETURPf 
3t1B 

3410 



THEN 
THEh 



31 fO 
3110 



TAE I DOIWJ... 

BALL flPPROfiCJirrffl FLIPPERS, EctTER THE T1?0 FlJPPESS TCH| UIBM lU FLlF 

IH THE F&Rrt: UpT T 1,2 

THE BflU IS ^OU AT : 4 , 9 ). 



morc- 



TAE F DOlfH--_ 

TOU GET ?C POINTS 

SCORE: 2^^3 



FROM GATE 3 



— iYfcOrc.-^ 



130 



hM c r rj FT E 

BBIUDBDIUDID 



* f t Q 

G A B C B 

G « t 

n * i * * * fl 
* ■* IJ 

G* E F 6 H *[? 
13 T t ^ D 

0=-- ■■iCr 

U I # J 4 ^ Q 
• fi ? B ? 1 □ 

1} g y jj 

FM , -M 

V / 

\ I J / 

\ / a 
u \ / G 



THE mi UA6 AT THE 'M^ 

rot BET ?5 PDli^rg FB&H BftlE J 

ratf SET « poircra FBon gute i 




TAB E DtrUfT..- 

tfll-l AFJ^f^Dd^C^firflJ fLIFFERS. EHTER THE Tllfl fLlP?EBS "JOO UISH TO FLIP 

IM TKE fORH: l^f > 3^^ 

THi BftL3. js ttuu flf 1 a , 3 ?. 

BALL nPPfia^CHIHC FLIPPERS. EftTER THE 1^9 FLIPPElfS TQU LIISH TD FLIP 

IN THE fDPtt: X,Y ? 2^3 

rvC, TDU KAl'E CHDSEi^ 7fi ^EGTEI]! THE UPtGie FLIPPERS. I41U t^QU HllV£ 

BftLJ-S LEFT- 
YflrlR EflJ-L K^^DCKCn ^^UH i TfiHS^ r 
for TH[3 STELLAR PERFQRMAreCE ^ YllU ARE AUAFTDhln 

SCi:]RE: 34U 

YQU HAi/E FLATEU YDUfl FIiJE FALL3^ MD HAVE SCOCtB 
ft nJTAL OF 2433 PQINTS. 

*** £(MaS BALL ^4f 

THE BALL IS MGU AT ^ 7 p 1 .S 7, 

YOU GET 75 POrHTS FROfl HATE 4 

iiCOfiE: 2435 

BALL flPPFDflCHimi FLIPPEfiS- EHTER THE fUO FLIPPERS TOti Ull^tf TO FLIP 

Iff THE FftRM: K^T ^ 1^2 

THE Eflj-L 13 r^OU AT C 5 , 7 )- 

TUL' WA'JE HIT FHE JflCFiPQT^ ■ ■ i TITTJ HAVE JUST UOH 12i PDXHT3I1 



TAI G OQA.w 

TI7L' GET 45 LTlIt^TE fflOii Sftlf 4 

VOU RECElUe UO POHTS FtOH TH£ BUriPES iHT 9^0. 

VOJ fiET 75 POINTS fanfl ijftTE J 
aCITRE: 27?? 

TCW EflD-.* TOU HAVE SO«E ^TRj^fljIir OUT 4 CHLITE HSLErD-^ Htt THE TriBLEJ 
IJl CSHSffLE YDtJ, I aUL Qiyt TBU A3* E^A 

<1 POINTSp TO BRWG r[HJff TQTAL TB 2340 . 
7011 HQU HAUt H*VE ffAlLS LEFT^ 
"^DUR »A1.L liNirCKEIi EiOU^J 1 rA(t3 1 I 
Fflt TrtIS STElLflR FERFDRflJiHCE , rOiJ ARE AUARBEE 
*Ttf^ m *^*4* pj]|NT5!L 
SCflftE: JQIU 
TIU HflL^E PLAVm TflUlT SIXTH BAIL fttflT KOREIT 7B50 FOUTTS' 

■*tt eOJiUS BALL *»» 

TffE BALL IB HOU AT ( ) > 13 ^ 

■y^U GET i& PDIHrS FROH IjA f E ! 

Bi:i)flE: ^?]l^ 

&ALL AFPROACHIHG FLIPPERS. EHTER THE TUfl FLIPPERS VflJ JlISH Tfl FLIP 

IB THE FORrt: ^/t ? 1^2 

rfBp TOll ifilVL CH[?3Ln ID PJ!I]T£CT THE UNHD FLIFPEES. YQU Wfl HAVE 

D BALL^ LEFT. 
"YBU HAUE PLAYED Y[?UEr SEiJERTH BALL AMI SCOFEB 7910 n3IHTSE 

CBHE PLAY ABAIH SDHETIHEI! 



31 IB 
J1Z0 
3f30 

^1144] 

317:i 

32D0 
3210 

32 J B 
374 B 
3211 fl 

3270 
J2S0 
3294J 
33B0 

J37fi 
333« 
3J10 
314CI 
3370 
3]S« 
33V4 
34C0 
34 EO 
3420 
J430 
4010 
4P?0 
4D30 
4D4(i 
iUO 
4[i?t 
41ISD 
40? C 
4](iO 
4H0 
4120 
1f41l 
IDIO 

S(i40 
5030 
34 JO 
5fl&0 
5t?^ 
$100 
5110 
5^t4 

iUTO 

dD40 
^044 
^O^O 
6Ut 
jSIOO 
7B50 
?S«B 
7B7B 
V30l> 
?501 
.950^ 

9521] 

?S40 
9550 
■^3fiO 
9570 

93 &D 
¥5?0 
?iilO 

94 J B 
9i4B 
9i3B 
94fiB 

?7Bii 
9??9 




<iq^+\iinJ«ci"r5 



OBTO 3390 

I^ H3Hi THEH GOTO 31BD 

[f L<?KI1 rilEH 32fl0 ' 

D'ZSIF IflT(1+PHB(|)*r)iaT THEH B=B*i!4lNT(frH[F(l3*3))-2MF fl>3 THEH [r-D-3 
RETURH 

3=I:IF E#TCf*RNllC(|«»t1 THEH D = IHT CRIJBM ]»a h*D 
RETUttH 

D=2:IF [^TCltRHii(l>*2) = 1 THEW fl^H+JBTCRIfBif 3*3):IFII>3THC« B'J)-J 

RElUfiH 

ll>4atIMTERHnC1>tl4A) 

PRINT *VOU IJAgC HIT T«£ JACKFBIIMi 7D1I MAVl^ JiJS^ tfiJIf -JflJ" FOIHTSU" 

P"p*a 

PRIfll 'TQU NBU HAVE ■;P;" PDEIfiai - 
GB70 lUi 

e>[HTfRilBCn^&4^t1-F=P+G 

PJlEflT -YOU G£CEI9E ";JJ;- POIH fa FRBJt IKE BEWPEfi AT -:L(1):"p-;L^:?] I","' 

pjiiBT *acaitEi ■;p 

QBIO ;3340 

Q='5^n+IHTf(!ttSfr]+4>J:P-p4fl 

P£[flT "YflU 6ET ";Qi' PQlrtEi KCUH UAlE " SHILfCPiaC f ) I pLiSJ , 1 f 

PilHT "SCDREs '*;P 

Ln5-=LL[1J-JNrUt-R||in)*3>)-lHTnt-RH[l(1f*2J 

LC25 = H2?-3+-lFCTCffMUh*S5-H 

AET4Jfirt 

flBSJJB 7S50 

GBTO 3:30 

L{1^-L(1 )-[1-+IHTtEtKD(J>*3)t 

Li2>nf2)-2*(1*lflIcHl!D{lJt4^] 

RETURN 



EfflER THE TUfl f LIPPEIfS lOU UISH 



"BULL APPRlWCMIrtS fLIPPERS* 
'^Jit THE FaRH: X^l ";"J^ll 

-B THEN 4IT0 

mil MjI'JE CHQSEif TB PfiOTEGE THE iJffONG FLEPPEfiS. Y3U Htllf 
BALLS l£^W 



a DR e 

"Nfl, 
B-lr' 



5UEii 



. ■_ Ji 



TAGS" ■" 
FGIHTJir" 



I M^+fitt- 

EXTBA BALL! 



3*IPUT 

ff V 

PftTNT 

Pfi[NT 

MJ-1 

ftO'B 

IJ05UB 

RETUfiif 

RfTiTRN 

3f Z3 = 10 TtfEtf S090 
EF ;j-0 THEN JETJRfl 
PPINT -rTif^ 3^LL K?^OC}rED HDUN 
PPINT 'TOR THIS ST£LLAR PERFBRriAilCE, 
PRIR r ^'tii^**-; 1 0*7J ;''tl:MPt-; tPRIHT- 
P^P^lBifi 
BDTB 5120 
F-Pt250 

ffilHT "*M*+'rQ4f KHDrKEB BQUH ALL 10 T^SSS 
FKlHr "TOfl AfiE JiUARDEIt 250 PDINTS AriB AH 
B=fii-: 

fAiXT -MDAE: ";P:RfTUAH 
^fri*rT 

i^HEKTsFRINT- P I C T Ij |T E " :PRINT'"t«*l:t««^*rttrtt- 

FOR B=1 TO L'n-|:PRINT ft(ll]tN£-;{ LI 

Pfi[«T HIB*(F)(L(nM,l(2)-1]rtt";HID*(P*an)M(2)41,lJ-L<2n 

FAR D=LCntl TO 70iP!TIHT P^fQlr^fST 9 

f"PlNT:PRINT"TJlE BAJ,L HAS AT THE ■'i-'~;pF;lHr:FSlJn"**»»t*»«*»+****+- 

RETURN 

Lt2J=AflBa^7J-?4lNrntRBBillM)5 
IF L(2K=15 THfN ftETUflN 
L(Zf':tir^TCRKIiilJ^15>iRtlLJK^ 

FDE 0^1 TO (2lF*n]=p^n?f"E"*i:tfRl[gjr"l":X£n U 
pa^T ]-pjf 1 )■*" " 

a ■ 

4 * 0- 

0- 
a- 

a* 
□'■ 

un 

■■■0" 

s 0- 



TD FLIP 

WAVE'' 



fK2? = '^ 

Piri?»" 
F1[7^=" 

piia^^" 

F*I9^^" 

p*fin= 

P*!t2?n 

p*n4J= 

P*a5J = "| 
P»C I4)b"Q 



A B 



t: t: 



fl 
fl 
p 
1] 

Q* 

■■fl=== 
-a 1 3 3 

"el t * 7 
"0 

p 



H 



5 9 



* 0" 
0" 



Ptn7>= 
F*n?>= 

P»C203- 
RtTlJfiN 
PCIilT "CJIHE 



D V ] 
B \ 

B \ 



J / 






] -_/H 



PLflT AGAIN SQKETIrtE"i-;E«D 



731 



Rabbit Chase 



LIST 



Seemingly, the purpose of ihia game 

is fo chase-down and catch a rabblt. 
Now this rabbit is an eljsive Utile 
devjl— IT can hop randomly in any 
direction. You can run at least astasias 
Ihe rabbit, maybe even fasler (the 
computer will decide). You mu&t get 
within 20 unfts of the rabbit To be able to 
calch htm- Before each hop, the 
computer will print out your position, 
Ihe rabbit's position, the direction Ihe 
rabbit is going to jurnpp and your 
closest approach on the last hop. You 
are loJefl Ihe computer which direction 
you wish to run. AM coordinates and 
directions are as a geometer would 
mark them on a standard Cartsaian 
Coordinate System 

In addition to being good fun, this 
game gives you practice in using and 
visualising an x-y coordinate plane. 
After each hop, consider the output 
andtj-y torun rhe right direction. Try to 
do all the Mguring m your head. Using 
scratch paF>er is considered to be 



ftUN 



cheating {except for maybe the first 

time you play) 

Suggeslftd Modlflcal^ona 

1. Change the program so Ihatyoucan 
choose your own speed - 

2. The game is much more challenging 
when the "capture distance" can be 
vaned- A distance ol 50 units is a 
cinch, 15 units may make you wish 
for scratch paper, 5 units wil I require 
you to use a protractor and graph 
paper. 

See rf you can frtventawayto^xtend 
this game ro 3 dimensjons! 4 dimen- 
sions! etc.' 



3. 



imihng 
and/or 

hints 



the total 
having the 
when re- 



4. You might try 

number of hops 
computer give 
quested. 

Rabbil Chase was written by Ted C- 
Park ol Pacific Union College. IT first 



appeared in 
Mar/ Apr 1975. 



Crea ri^e Ccmpu ting , 



MEfillVt CDPlPtJTINE flORRiaiDl^H HEU JCRSCI 



9*fft? (iJBirE/ffnPfc 



I3{l 









4Bg 



HJlPli 
RAierT 
tflU "■ 



2 AE^EAffCE ^H R^AB^q V? 



HDP1: 
RAITBET " 



HOP It f 
f1A»B[T -- 



D^aiAiHCE TO 



L -3?ap 499) 



mSTftNCF TQ FtflHiTc 2?5 
FOSlTlOit: I -IM, 3H) 



KDPI; 
Pfi^BIT -- 
TWJ 



HflPlq 
tflu -- — 



NiiPit: 
■fOl — ^ 



1^0^ n: 
^eu 



PQSJTIDU: i -1?S» 4?t^ 






iriSTAfcffE TD FTflTBir: 15? 

POElTlgji: [ -i2ip 4iO 
POStTIDJi! f -Z3Sr 3I4S 



E UII^TArttlE TC 
PiJSJTIDJ^s 

pdb:tidii^ 






CLOSEST APPROACH: 



CLOSEST APfRQflCn: 
ANt DJRECTIJ]^^ 13D 



CLOSEST ri^PPfiOfiCHT 
AND HIRECTJqNH 11 



CL0BE9I flPPRttflCH: 
ANH HIRECTIOh: J14 
AMI IiIRECTJIhhit 135 



CT-DSEsr flppR[rftE>i: 

rt**Ci B]RECTIO«: ;^4 
rtNEi [HflECTID**:'? 



CLOSEST ftPPRQflCHr 



CLOSEST flPPP^OfliTH: 
frflt BIRECTxOfrj ^11 
AWIi IiIRECTlfltfiT 



CLOSEST flPfRDftCIt: 

fljfii iiiFrEC-:cjiri. u^ 



J 7? 



377 



^?^ 



g? 



5^ 



JB 



2«Q 
Z93 
2fO 
5^3 
34C 
3S5 
lip 

3i; 

3» 

J3P 
J35 

30 

3JI> 
355 

34^ 
374 
3£0 
3T0 

193 

445 

<ie 

J7» 
425 
434 
433 

*o 

43C 

q^o 

A70 
475 
4Slj 
4U 

4frD 
5DD 
51fl 

535 
5T0 

ob: 



GDSUB 5£C 
PtlHT \-; 
LET 2»T1 

PRINT "^ 
LET r*n 

QOSUS 514 
PR 1 Pal 

fHllft "JfiU 
LET 1'12 
liDSL'E 5^{l 
PFTIH^ ",-; 
LET i-T2 



Id 
2(1 

3C 
4C 

50 

100 

105 

iri 

1?5 
130 
135 

HI? 
Mi 

]5{^ 
]S5 

I A3 
17J 
175 
ISO 

les 

1?0 
ITS 
2l}0 

:i5 

225 
231} 
23 S 

24^ 
^5(1 
253 

240 
3i3 
270 
27J 



PHiUT 
PGII^T 

PRIfll 
PRJttT 
PRJjfT 

LET 
REM 
LET 
LET 
LtT 
LET 
IF 



TflB^2Tj;'M6BIT CHABE" 
TUBUS}?" E JtEfl r J « CDnPuT ^ME 



hJ^i;? 




JERSEl 



THE EDLlflRE DF THt £APTUfiE DISTi^NCE 



PQBmafl^ 



T = 4CH} 

- I«[TJ|LITE HELOCITttS J^NB 
^'lnr»fT^RND[1}tH}#,l]t10 + 5'j 
y>aNTLR*(D(U^^^HS?-H?NV! 
T1i-CIM(R«CiCU*IOCfi*iOOh*SCj^^FLHIilU-.53 
ri>^CIIf1lRMDU^*400lt-ll>i}>t9GlillHEii1>-,Sl 
T1=1] CIR j:i*D THErt h3» 



I? 



SPEEB^ ^UNlTS/rtDI-5;^ 

ICflBRjT -"E^I/'TQU -"JV3 



J.E! X? 
LEI TJ 

PRINT 

PRINT 

P*iNT 

PCINT 

PtlrtT 

LET C-t5:?-JT]"r4['^2-^1 J ? 

LET Pla3,^4l5?2iS3"iB9/iga 

LET M=} 

FrEfl -- PRINT auT 

LEr B]^]liyEffNDil>r3373 

FREJir "i^gpBi "i 

LET Zi}f 

EOS^B 31 <] 

PRIift " DlSTAifCE 

LET Z=SQSI[J:2-3:1? 

£|}SU& ?I0 

f*l[iT " J^lJISEST 

LET Z^SBeiJ:^ 

Od^UP 511? 

PftINT 

PRIKT '•RABBIT 

LET I*ICI 



TO RAIEIT: 

?+^T2-yj}- 
APPftOACN: 



2} 



PDSIUUll! r 



ftPfff UlRECTIQttt^i 



PD3ITIBN? '^ 



GlJ54fE 
PRliTT 

I If PUT 

IF D; 

PR[|IT 

PIllHT 

Rtft - 

LET 

LiT 

LET 

LET 

LET 

fBE 

LET 

d.E1 

UI 

LET 

If C 



52r 



; ^ 



Jl«5' EiIflECTJQh: 



112 >-Zfifl TKEi, 355 



-- COMPUTE PATHS ANIi SE£ If T«ET liflEJtSECT 

A3-Vi*^;ogfB1*P]^/1&0 

Y3=Vt*S[N^Bl*Pn/H}0 

I4=1"?»C0$C&2*P] i/H)0 

T*iV?tSINtB2*P]J/lBi) 

C=[i.l-ll r^ + if^-TI] 2 

E-1 TO 1» 

:fi=xui3 

■rP-T]+T3 
S?'=X2 + X4 
t2«T24T4 

^ (j:2-J:ir?4tTZ^fl>-2 the* 443 



c=ci:?->:ir!*(T>"ri;-^2 

N£XT r 
LET H»H41 

[f C ? T THEN 215 

PS; I NT 

PRINT 

PRINT ^***t****t.r" 

PRIrt^ "• BOT Tfl -♦" 

fRlrtT ° •*«* *•**■■■ 

PRIHI 

Pfclhr 

JFTTi 

REn " i:j3ni'Ei^T5 

i*ENTi;f,5) 

PJIINT RTEHTat" ' tSTRi(Z},3] ; 

R£TU^h 



LUMBERS TD STKjf^GS FOfl £LE*HES: OUTPUT 



T32 



Roadrace 



fiUN 



Vouarelhe driverofa race car on Ihe 
nolonous NY Route 20 Youll have to 
dnve5 rrtiles Willi ^y^ gallon of gaa, while 
keeping alert for changes in Ihe road 
conditions, other cars, etc. 

At [he Stan you pick yoiAr car and 
course During the race you control 
braking and acceleration- 
Watch out for passing another carl If 
you try to go the same speed he's 
going, you're going to meet a 
Greyhound bus head-onf 

The game is lough to win. I usually 
wipe out in a curve or run out of gas 
You might ^&r\t 10 increase your MPG 
rating. . Jook al line 870. 
Good !uck! 

This program originally appeared in 
Creative Computing, Jan/Feb "1975. 
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7HES IS TKf PLT7SFI£Lil-liLBAMT RUAS} HALLf 

UEIGOHE TQ THE fIRST AMHUftL PITrSFIELQ-ilLEriH^ MAt AALLT. 
TOU'U B£ UltlVINe RT. 20. TR'TIMS Tl? UIN THE RACE AMD 
STAT ALIVE IM IHE SARSIN. GllOll LUCK1 ■ 

TOT KAilE TDUR CHOICE OF t M) A lU; 123 291 HOUa; 
13) Z-2fl; l^R {4} FERRAAI 




flQAD HDNDITIDN^zl^CltlCU ^IND PASSEH 

GRETHflJMD SUS |N OTHER LAilE SllIriQ &4 »fPH CRASH VEIQCITY ^ 143 

UHCRt [9 TDUR fUM^RAJ- ?ET#[> KELIT ^ 

rai> UAHT rj? Tirf aqain^ risht j ■ ^ ■ 

LJIIICJ4 CAR-? 3 

PfiESEHT VEUCETr ■ C HH^ OF CAaO^f ■= .1 
Fill. Of HUES ^ D rittE MASSED - 1 SECOdHS 
UNAT IS tl^UR HEV STATE Qf GAS * tO 

RBAB CJ^NDIIIQN^E UAAtilrfltl CtipuE AHEAD 

PRESeitT i>ELflC|-fT . ?0 ffQ. Qf QallCnS ■ ,^7 

HQ. Uf nllE^ ■ .]S2171 7lnE Pfi&9E[t « iH SECQnBS 

UHAE 13 TDU34 N£U MTE CF flAS f i) 

ADAD fDNBET I Q^S: THROUGH CURVE 



C^DflSE TtiE i:M TUIJ UAHt BT THE HUflBER IH FJ^DHT DF II, 
REftEifSEflp THE BETTER THE CAAp THE ilHRE S^ IT USES^ 
IIHICM CAR? J 



PfilSEKT VELDCIT] = 41 Nfl, Jlf &AL|_aHS = -47 

H0^ or HILEa ■ .?413C4 TlHf PASSES - 24 SECDNI^S 

UHAT li TOVFC tfEU MTE DE 9AS t ? 



^lU TQU CiraaSf VHICH CDOASE "VOU IHriT TD RACE QH. 
THE EA5IE5T CQ[JFtSE |5 NUNaEft 1, AH& IS THE STEAlEMTfST 
RUQtE. RUn»n 5 COflSlSU FIOSTLT QF EUlfflS AH[p TvlJTS^ 
UHECH SD^Tf B[] TDU UAflIT ] 



Uh Utll ilEEl TD 
TQUR STATUS UILL 
STflTUS CIStK TOU 

A GATE Qf tiD IS 



TSflUEL 5 JiKES UITH -3 OAUD#S ffF fiAS, 
ffE 3H0LIN EACH 10 ^EtOHDS^ AftEf EACH 
UILL £E A3KED FDR A flEU RATE Df DAS. 

HAAB ACCELERATIQMt AJtD -14 IS HARD STtAKIi^i^ 



Ai^T MOHSER IN SETUEfN IS ALLOUAHE^ 



PEEBENT UELirCITt 
flO. DF *1ILE3 > 
tlHAT [J TQOR MEU 



^ 4 MD, Qf QALL4I4S » .? 

Tinc Pi^ssEB - n SECoriDs 

RATE OF SAS ^ 10 



fiOAB J:Dil BIT 1D«S± CLEAR ANB 9TR44IQKT 

PUSENT yElOC^T = 'fl HB* Of IjALLUaS ■ **? 

HQ. DF illLES ^ ^152174 TIffE PAS^EA < TO 5ELDHD9 

UHAT IS TOUR JfEU HATE QF GAS T 2 

RDAIT CDJlIiITIONS:VL£HICLE AHEAD 1 0CO FEEl 

PRESENT VELOCITT * H JfG^ Qf QALLDNS ■ .464 
HD, DF HILE^ = .^7173f TINE PASSED ^ 34 SECCfflDS 
UHAT IS TDU A NEU fiATE OF OAS ^ 10 

ItDAB CDNDlTIGIt3:VEE:HICLE ?A33ED BT fi IfPH 

PfiES£«T UELDCITI ■ 10! «0, OF GliLLOWS ^ .434 
ND. Df fllLES > .4?147S TINE Fl^SSED ■ JO S^CaNQJ 
UlfAl IS TDUA ^1^ RATE OF QAS -? 14 



JEOAD CQMBITIDMSiVECHICLE AHEAD II 



Ftei 



PWEStNT ■JELQCITt ± 134 KB. Qf GALLONS =- .444 
H4« JLF RILES * ^774DS7 tTHE FASSEal = 40 JECON^S 
UHAT IS TDUR icEU RATE DF GAS ! -3 



JIOAS CDVBlTIDtfS: UARNIJ4G: CUR^ riUIEAB 

ntESEHT VELGCITT ^ 73 »D. DF DALLGKB > «4A4 
rfO« 4F ^ILCS r ^4 TTAE PAGSEIr ^ 30 SECOftBB 
LWAT IS TOUR MED RATE DF GAS -? -1 

RDAU Ca#B[TlGJIS:THftCU6H J^DRVE 

PRESENT tiElOCETT * 34 ^, Of GAUU^fS ■ .44^ 
HD. OF NELES ^ ,47SZJt TIttE PAS5ED ^ 40 SECONDS 
UNAT IS TODR HEIf ftATE DF GAS T TO 

POAD CDNDItlONStCLtAH MCD SlnAIONT 

PRESENT VELDCITT ^ ft ifD. DF GALLONS ^ .41? 
HG. OF niLES 3 .APiDS? TlflE PASSED =^ 54 SECDHDS 

UHAT 15 YDUt NEU EtATE DF OAS t S 

PQAD GONDlTION^t VARNTMQt CUH^iE A}£AD 

PEE^Eirr VELUCITI ■ ii ND. dp gallons - ,444 

NO. DP HliES ** .Sfr;if1 TINE PASSED ^ d4 SECONDS 

UHAT IS VOUir NEU ffSTE &F fiflS ? -4 

ROAB CDNDITIDNS:TJ^RD1JQH Cl^liE 

PUSEKT UELr^CTTV » JD NO. DP SALU3NS ^ .^04 

HOh dp HILES m ,41^91 TTNf PASSES ^ 7D SECONDS 
UHAf IS TDtUt NEy RATE OF &AJ T 7 

fiOAB CDNDITIGStS: UAfttHJCGt CUA^E AHEAB 

PI^SEMT VELDGIT'T * &2 NO. I}F BAU-DEiS ^ .3B3 
MO. DP AILES ^ 1.0^217 TIH£ PASSED = 30 SECONDS 
UHAT IS TDUR KEU RATE DF GAS ^ -I 



CQ^blTEDHSlAEiE TERR^LE 
Tfr HAS T«E EPEEIi THfll]U&H THE ClfRVE 
2? Mi TOUR SFEED^ BT THE UAT UNEItE IS TDUR FU^RAL DEItQ i^ELD ? 
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ID FRIfll TABlJ?^;"R(WiIifrfiCE" 

2D PRIttT TflS(l5^;"CftEllTIyE CONFUtlHe HOIlRISTBUH JIEU JERSET" 

3D fRIJfT 

4D ?RIHT 

SD PFlNT 

IDO PJr[«T " THI5 IS THE f [TTSf lELH-ftLBANT FDrtE^ ftAtLt" 

120 FfllilT 

TJfl fRtilT '^UELCDfiE TO THE FIfifiT AflEfUAL PTrr^FIfLTJ-fllBANT E^DAD RALU." 

Hfl FRfiiT MflUaJ. JE BRiyiHfl RT- 20. TRVJ*IG Tfl UIN THE PflCE ftNi* 

T50 fRIHl "ST^r ALTUt IM THE £AROr»f. I^OAC LUCE^i'^ 

140 ^RTMT 

1?D PRIHT -rOT HftVE TOUfl CHOItE OFl [U A UU; (2? ?a3 PfOVfl;" 

IftD PRIHT "[3h £-28! OB ^4> FfPRftHI" 

ITD FPINT 

2DD PRINT "CJiOOSE THE Clifl YDU UftFfT BT THE HUHBER IN FKDHT Of IT." 

210 PftlWr "REHEHREfT THt flETTER THE Cflfip THE nfll^E GiS IT LISES-* 

220 FftTttT "tIrtlCH CAR"; 

230 INPlPt Cl 

3*0 LET CI^IHTfCT) 

2flO [F Dl > 4 THEN 28D 

2^D [F Cl < I THEM 2St 

27i) BQTD 300 

23D PRinr ^'Irtl;flL[& car NUHffER. KEU CftP "; 

2»D ODTQ 53D 

3D0 PflINT 

310 If NZ'I TNCN J4J 

■S20 PrtlHT' "NOI TOl CHOOSE ifHlCM {IDLJASE YD^ UANl EQ RACE QM . " 

330 FRI«T -^THE EASIEST JIHURSE IS NIHBER l* ^I" 13 THE STRfllQHTEST* 

3W fRI**T -RQITE, JIUftBER 1 tONJISTS flDSTLT OF ttlftN? AHJ TtflSTS-' 

3*5 PRJHT ^HHICH RDUTE Bfl TOtJ UflHl'^i 

39D lUPUT C2 

340 LET CZ'iHT^tii 

330 Ef CZ < 1 THEH *10 

3*0 IF C2 ) 5 TJ^EH 410 

4tfl GDTO 430 

410 FRlriT ^HJUALIU COURSE HUHBEI!. H^IJ EIHDICE *! 

420 BQTO 350 

434 [F N2^1 T»£H 4ffl 

435 PRINT 

440 PRINT "lOJ HILL NEED TO TRftUEL B HILES UIlH ,1 OfilLMS UF QA3,' 

450 PREHr "fOUR STATUS UlLl SE SHDUH EACH 10 BECOHDS. j^FTEH EAIH " 

4£d fHEHI "STArua CHECK TflU HILL IE fl^KEB fSft A HEU FATC Of CftS. * 

4Jfl PRIHT "fl RATE OF +10 IS HAnD ACCELEftATIflNp rtHD -10 13 HARIi BRftKINO* 

4^0 PRIHT "AN^ EJUH&EJ1 Til RETUEEN [& ALLOUABLE.' 

4fl> fDR [ = 1 TD CE 

^QD REAB BpN,3 

SIO LET 3=B/1D 

520 NEXT E 

iii^ L£.T AE'.5 

540 LET HJ-0 

S^U LET ci=c(/a 

5iD LET V^O 

5?D PPTNT 

990 LET RE=0 

5?0 LET T-D 

^Od LET H^O 

dlQ LET ai=0 

i2l> PRINT "PRESENT VELOCITY =";M;^' RO- OF GALLUP '*'!it 

d35 PRINT -Hfl. OF HILES =M11 ^ TIHE PASSED =-;T;"3E[;aflDS- 

fl40 IF ni?^ ^ THEH T4iD 

iSO fftLWI "UJIfiT TS VOlfR NElf fffilE QF fiAfi "; 

^40 INPUT fl 

i?D IF & ^ -ED THEH 7D0 

dBD IF D ? 10 ThEil 7D0 

dVD QDTD 72D 

700 PRINT "NOT yflLlB. tiEU BATE *; 

7J0 flOTO iiO 

?20 IF 6 < 9 THEH ?*> 

?30 LET !■:+! 

?*D [f 2^ 4 THEtf ?*0 

?50 GflTQ ;^D 

7*0 PflINT "TOUR EHQINE BLEl^- TOU ttLJT HIT BT A flSTDJI." 

?TC G3T0 12?l> 

780 LET I-^5 

790 LET VEtfriB*B-|l*V*|i) 

BDD LET T=T+-lO 

SlO PRINT 

320 PRINT "ROAD CQdPlTIilHSt-; 

eSO IF U ) THEJf 3^0 

9*0 LET V^C 

S50 LET tl1=H1+-V74fiO 

S&O [f G<0 IHEH B90 

S70 LET fllrfll-{G*S>7300fl 



IF ftK IHEri 13B0 

BfD IF F[1=> TREN 1030 

9aD IF Q1=^E TR^K fSO 

9lD LET B = IHIf(C2 + l]^RHC(in 

?20 LET H=llfTLCJ.75-i:2?PElNliaH 

?3C If R > THEN 1J*0 

f40 If H V THEtt 134B 

950 PRIJIT '^CLEAR AW STRAIOHl" 

9ifl PR[J*T 

^7& SDTD i20 

9BD LET R = [«TC15*35'+HttB(1)) 

9?D LET }i«HfS*D1 

1DSD IF ^>h THEfl I30fl 

103D PRJIfT -THRODBH CURVE' 

1020 PRINT 

1030 LET t]1=>D 

10*0 IjGTE] A20 

1D50 LET E-iE-^U-B]*5t 

1D60 IF E < THEM ItSO 

1D7fl FWItfT '^liECHICLE "lE^ FCf^ AHEIIl' 

1Da[r PAEKT 

10? I> CDTD £20 

t30D IF l-B <- 5 THEH lltO 

tllD PRINT "HECHICLE Pfl5SE0 B^ '; 

1120 LET D=V-D 

1130 PRINT D; 

3140 PRINT "HPH" 

1150 PRINT 

tun L£T R1=0 

t]7D 3QTD 620 

TlflD PRINT -VECHICLE SEINE PABSEIl "' 

T1¥D LET D^lHT125*40^PHIin?] 

1^00 PRINT "QRETHailNt JUS IM OTHER LflflE "J 

12tO PfiTifT "BJIIHQ ■; 

12?0 PftTHT B; 

1230 FHlflT * HPH "; 

1240 LET B^V+D 

1250 PRINT "CRftSM '^ELOCIlT ■= ';B 

127Q PRINT "UHEfiE T5 ¥DUR FUNERAL BEIHG HELO V 

1290 GCTD E5A0 

12?0 PBEl*T "ytCttlCLE AKEHl 10M ft£l" 

1»0 FRIHT 

1310 LET B=lHT(JSt35tR«DMn 

1J20 LET fcl=t 

1330 &0T0 &2D 

1340 PRLNT " UARIJIHGl CJR>^ AHEAB ' 

13H LET [11=1 

IJiO PALHT 

1i70 OQTO i20 

13flD PRIHT 'EJICELLEHT BUT UfllTI" 

1310 PRINT 

1*DD PRINT "TDU RAH OUT Of GAS^ 

1*1^ 60TO S550 

1420 PRINT ^BUT SOHE NDU lOU HADE t^* 

143D PRINT 

14*0 LET flI'D 

1*50 GOTO 620 

14&0 PRENI 

1470 PRINT 

14BD PRINT -TOU flABC IT (LUCKT) MEE!!!' 

1490 BUTQ 1360 

laDO PRLNT "AflE TEltRIBLE" 

T510 LET H-H-5»CI 

taw Pit I JIT Wr U'lS TtiE SPEEB THftUUGK THE CEjftUE^' 

153D PRIHT U;^ UA5 TDUR SPEEB, BT THE UAT ^l 

1550 FBINT "TOU LEAD FODTED «r ;<H*ll<ilU*^*(t^lt4^I«tNir 

1J£0 PRTHT ^TDti UANT ID TRT ACAINt fiIfi"T EIET 

157D FRJHT "l-TESp 2-HD-; 

1580 INPUT l^ 

un If V-2 TNEH Ei20 

1^00 N2=1 

U10 ODTQ 1MD 

1i2D FRIHT ^'CHICKr 

1430 DOTD 1700 

1M& RE5TDRE 

1430 OOTO 220 

1A4D DATA *5p. 53^10 

1440 BATA 60p^53t3 

1A70 DATA 7Dp«4lp15 

UBO ItAlA BDj,3T^>e 

1700 ENB 
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Rotate 



The game ot Ralate Is played on a 
fouf-by-four board filled randomly iwilh 
Ihe JeTters A through P In a sense it is 
like ihe IdTle pissuc games with sliding 
pieces bearing the rurnbers 1-15 or 
letters A-0. 

The abrect of ihe game is to put ihe 
leiiers in alphabetical order. This is 
done by rotating groups of four lellers 
clockwise one posilron. The group lo be 
rotated is specified by the positionaf 
number of the latter in the upper left- 
hand corner of the group Vou are also 
given one special move which permits 
you [0 flJtchenge any iwo adjacenl 



letters You probably don'i want to use 
this move too earJy in the game, indeed, 
someiimes it's not necessary al all. and 
Since you get ft only onetime, once you 
use iTyoucan t recover. Your only move 
then is to type a zero to give up 

Typically, a game will take from 20 to 
30 moves to win. I haven'i hgured out 
the worst possible casB (assuming an 
inielligeni inelhod of play); I'd be happy 
to hear from a reader or this. HavQfunI 

Rotate was wrirten by me, David Ahl 
and first appeared in Creative Com- 
paUng, Sep/OcI 1977. 



LIST 



rABi:zaj;'')ioTj)TE- 

l»i ( 3D ) i -Cl+EflTIVf COdf U riNfl ' 



EH 
II 

II 
li 

4D 
4? 
3t 
51 
it 

?» 

sa 

'0 
'5 

T« 

TIO 

111 
1?l} 

m 



PHUT 

pbtut 

Jiipji "naTFrucrrniig-iBiiPitwiTiF leftiem,! h*"r the* ua 
pium ']* iif'fi mm THE Bafifri ls i*:ii aut as foliquSi- 

FDir 1-1 TO 14iBr]>l;l|CJI 

pii'«r^[pf E-i TO 13 aiEP * 

P^lUT Tfle(?)iB(l)-Tftlfir;HllMi;rflB(1ftl^B([»3t|T*BirJ);Jf]*31 
NCll E: PR Tift 



KUlf 



'THE 

■UFPfjr 



PFIIIT 
PRlTH 
PR lit 
PRJci 
Plt»T 

piriiiT 

m I. 

BICA>' 

PPfNT 

FDA 1-2 ID 

pkim 'DHs 
pmnT 

PVmT 

PEIIT 

Pt[|ll 

Mrivr 
fKim 

FlfliTT 



I PUS 1 110119 tn BCCBPTED IHMfMnir 91 THE LETTtPa A fD P 
HJECT OF TiE ijfllf !3 tQ DUDEP TkE LETTEPS BI ffUTftTJUQ" 
FQIR lETTEHS CLDCKHtSt DVE fOSHiaif, £Dll 5PECIF1 TIC" 
lEFT POSirmil Of THE FOUR tJHJ mSH TO BDTHTE, l,£„- 



■VftLlff fl0«5 tni r. 2, 3, 1, a. ?, », lo anii n. 
■CMSEBUFRTLr, tF THE BflflBS LQffKED UKEl" 

1 10 '4iBHJh=CMIia»4<J:KEXT]BH2J«-C-:BJ(3J--fl' 

■nm?)--F-:fii)siri iju 

'»NII TOU JIOrJiTED FDSrilON 2, IHE ?DiBP| UQULB BE-' 

VQU IIOULIt UTq ■-iPRiriT 
■rBl fiLSQ SET HE 'SPEC 1*1' flOliE PER QflnF UMrCH lOU rt*Y or 

-11*1 HOT wen. the snciti nmiE ftiinua jou ro c:ich**GE- 
•MX Tw snjtcEiir uttfjis ck n aow. ic jiake thi5 hqvc,- 

-HPUT A '-f *S TOUR POVE "H XOU UTU BE ASKED FOR TmE" 
-P*»iriD(IS ItF TIE lue LETTFftS lO EACHflNGE, REIESBiif —' 
-QVLT DHE SPECIAL hOi|F PER S4lEi-:PTllHT 



-iPRIHI 

I4t fm 



TQ BIUE UP AT MX UK, TIPC A ' B' . ■ : MHHT ,pff i ||T -SOflD LUCt i 



TSi} 
Mi 
l»3 
IFO 
175 
lj« 
HO 

?co 
;ie 

313 
JJ8 

J3l} 
310 
BE" 
Hi 

429 

Sli} 
320 
330 
310 

DI 



TjI to UtBtliJ-'D-lrtEir 1 

FDir 1-1 tD I a 

Tl-i:H(«(I»Hi4.Pl|lK1H4a}) 

FOB J=l TD I 

IF B(UJ"Tt THEH IdO 

"EIT J 

BtfII.Itil*(T I 

(l-lll8-0fHl*T -H£JE'5 THC fiTflHUBQ lfteRft..,--oasUI Kt 

WIT -paaiTiim td *aT*T£-;i:if i-o thejj p«ip*TiPRj^r,fi]TB 
IF ii-i Theii MO 

IF |.» OR I'l DE |>ia IHfq PBTIfT 'ilLtOK. iflfifl J R . . , " iGOTQ 
1-P'1ll1i|1ll> 

l»4i]-Bt1l*l?r£1IIi1h-£)IIi?F:BtlI'3>B»{ltl ]:B>1]»1 )iT| 

ensoi tm 

Tan I'l TO 16 

LF Criiril|*i1><>t1in THEM ZOO 

REITT ] 

PIlmiPIINr 'tOb UDEBED IHE BOAPB J«-;h;- IIOyEfi , * ifli -Hi 'B iG^-Bl I 

^RJUT CHBt(J):FD(l 1-1 ID | i 



Z90 



P^lJflcIIFUE 

"mftiPRiJir 



■PUl' HBKIh- 
TOU PL* TEL- 



iflurp LEFr»(Ai,if 



SAKE^ AVD 



1" 
I^RlfEKEH 



IHEN T10 
THE lOAKB 



IH AH AVEPA 



Bin-iJi 



PIEIT -Or-jm^B;- fUuES PES 

PIUTjFDR 1.1 TO 13 STEP 1 

fRIBT HID- -Bill*!)- "BKItpl" 

HFTT lLFirillT:flETUItl| 

JRPUT -EJICNANGf UHECh TUD PJ>9 ]T lOlffi- f t , t 

IF XOTtI AIIB Kor-1 TIfEB PflUT ■ILLfljSL. 

a«s*i:JF 5>i TirEh mm -<t>ii.t que special 

ri>BlCtr:BiaiiB«ir]:Btll>>tl!SOT0 2(9 



flBATIl...-[80rD 310 
HDirt PEB QAflE.-iBaH 



290 



irOIUTE 

CREATIUF COIPJTIRQ 

iiCfiirisiaiiN» mii jfrsef 



iBSTRUcriiiiisr rEs 

Tl THH GAAE iHE iOttll IB LfliB BUT AS FflLLOJSj 
15 3 4 

3 A ? e 

^ ID 11 1? 
13 14 ti U 

HrtRS POSITtOflS AEE OCCUPIED fffiUDOflM Bl The lETTfPg fl JO 1 

II! cl^l^^ " '"^ ^"^ " ^' ""^'f '"t I-FTTCPS BT HOTflTlNO 
W nWS lETTEM ClQCJIIigE ONE PflSITlQ-. IQl, SPECIFY THE 
UPPER LEFT P8SITIBN JF IffE FOUB lOJ UJ^Jl Tff fiDTUE, 1 £ 
VBLIB rtaVES ARE 1, i. 3, ,, j, 7, ?, |9 m II. 
CflHaEQUEBTll, If THE tOARB LOimED LISE: 

* c e B 

E £ F 4 
J J PC L 
fl « F 

fl« rot IMTATCP fBSITTHW J, IHE BQAItB UQULB BEi 

A C B 
E B f H 
[JUL 

M Jl P 



AID TO J UBULB IflU I 



rBd AtSO BEI DIE 'SPECIAL' HQI/E PEfl OilHF UHldf YflW HAT OH 

TmI hi tl\':. '"' '""*^ """^ *"""^ '^^ 'f e^£HJl*Gr 
*ti.l" "J-^E'T LETTERS II. A m. Ifl HflUE IMS 1QUE. 

inpuT * '-]' ft5 latjn flovt Am rou bili be asjieb fop the 

PBSJIIBMS Of THF TLO LETIFRB tO EfCHAHH. BEfliflBCB - 
Ollf OfE aPEClflt «VE PEE 9ABE< 



TB ai?E 4P AT AMI T|«f ITPE A 
GGOB 1.1IC>L t 

HEtE'9 THE STASTUU SaAAB.,. 
f C L 

M e n A 
F I r J 

HUB! 

nBITIOH TO MTAt£» 3 

E fl C 

K A L 

F I P J 

H N > B 



'/•' 
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PmiTIOlf TO ROfftTE' 5 

£ & C 
K A tl (. 
F I P J 

Hull 

pagiTiaif lo ifDHTei ] 

K ( C 
A e rt L 

f J p J 
H rj p B 

PDSITIJM TO MTflTE' I 

ft fr c 
G c n L 
F i p J 

Pf N B B 

PQSITJlM TB flflTflTEr |1 

A M C 
Q C fl L 

F 1 n p 
H rj B J 

PDSlTIDIt TO MI4TE1 Ifl 

A I! D G 

□ E A L 

F H I P 

H B D J 

P06ITIOr* TO RDTfllt? 10 

not, 

G E n L 

F B S P 
H D I J 

PUSITIOH TQ qOTATE? A 

A I Q C 

C B E L 

F * H P 

H B 1 J 

PaSETLBH TO tOUlEf 2 

1^ B H C 

& E D L 

F H H P 

h a 1 J 

PUB IT 10*1 TO RdtSTf* m 

A B >[ C 

Q E I. 

F D M P 

H 1 h J 

P[>91II0N TO flOTflU' fi 

A B K C 

ti D ? L 

F N P 

H 1 B J 

PDSinON Id ROTATE? 6 

A B K C 
|j It D L 

F a E p 
H T n J 

PnSITIDil TO FtQTATE? ? 

A B h C 

G II E D 

F P I- 

H 1 1 J 

POSrTlDd TO IfQlfiTE' i 

fl B E *r 

e N n c 

F f L 
H I 1 J 



POSinOA TD FOTATE^ 3 

4* I I C 

G IT i: K 

F a p L 

H T II J 

PUSITIDtt 10 PtlTikTtT 3 

A B C B 

6 U K I 

F P L 

H I H J 

PDSITlDfl TD rOTATtr 7 

A B C H 

13 « P H 

F n L E 

H I H J 

POSilUJd TO (TOTATET 7 

A £ C B 
D il L P 
FOES 
K I H J 

POSIILDN TO flOTATET 4 

A I C [I 

li Q n P 

F E I K 

H 1 II J 

PUS] Tin" TO IfflUTE' 1 

A B t B 

F fi H P 

E C L K 

H I h J 

fOSlIIOH TO (OTATE? 3 

A B C B 

E F V 1> 

E L K 

H I H J 

POSTTIQH Ed ROTATE? 19 

ABED 
E F If P 
a I 11 K 
tr II L J 

PDBlTlDil TO FfOrdTE* 9 

A C D 
E F tf P 
H & K 

n T L J 

POSIT lOK TO FtOTATE* * 

fl B t B 

E F H P 

H h e K 

1 L J 

POSITION TO ROTATE* l] 

A B C B 
E F If P 

H K L a 

I J N 

PIJSITIW TO SOTilTEi 111 

A B l: B 

E F N P 
n H S 
J J L K 

PD&ITION TQ HOTATET 7 

A B C I 

E r H I 

HOOP 
I J L K 



POSIT I OH TD JOTflTE? 7 

A F C H 

E F H 

H P H 

I J L I! 

POSITION TO BOTUTET 10 

A I E B 

E F e u 

H J fr II 

I L r K 

PaaiTEDrt TO ffOtAIET 11 
A » C rr 

f F Q H 

n J p 

II KH 

POSITIDH TO fiOUTE'' 10 

A H C £ 

E F H 

A t J 

1 t P H 

POSITION TD RQTATE? » 

A B C B 

E F E M 

1 H J 

K L P H 

POSETIOH TD ffOTATET T 

ABED 
E F B H 
V ] J G 
L II P fl 

pnaiTiDH TO wrfiiE' ii 

A I C B 

E F e H 

tf I P J 
I. H 1 

POSITION TO ROTATf? II 

A B C B 

E F G tl 

h [ H P 

L n J 

Pa&ITIOtJ TD flOTATf lO 

A 1 C I 

E F & H 

» J1 I P 

L D N J 

raGlTlQH TO ROTATE'' 11 

A 1 G H 

E F IT 

V A If I 

L J P 

POSITION TO FfflTATEt 11 

A B C B 
E F E II 

K n J n 

L P L 

POSITlOfl TH PDTATET 10 

A I D D 
E F a H 

K n II 

L P J I 

PQSITIDfl TO RDT*rE? U 

A B G I 

E F Q H 

K J Jl 

L P I H 




the6«me 



POSITION TO IIGT4TET V 

A > C B 

E F G K 

J 1 li P 

H L N I 

PiramOri TO BOTATC* 10 

* t C a 
f F G H 
J L I P 
H P K a 

POSITIQK TO ffOIATET 9 

A £ C B 

E F 6 » 

H J 1 P 

H L k 

POSmOfl TO ROTATE? IB 

A B C 

E F B 4 

fl L J P 

H I I 

POSITim TO ROTATE? 10 

A B C H 

E F ri 

* K L P 
M 1 J 

POSITION TO ROTflTET 10 

A B C B 

E F H 

fl I h P 

h J L D 

POSITIDH TD BBTATt? 9 

ABED 
E F E H 

V n tr 

J 1 L □ 

Pfl^ITlDH TD RQTflTET 9 

A B c n 

E F D H 

J « k p 

1 ■ L 

POSITIOM TO PDIATE' 

A B G B 

E F G N 

i J K P 

H H L B 

POSITION TO EOTATET I I 

A B C B 

E f S H 

E J L t 

fl if a P 

POBITlOfl Tf> BOTAIE? -I 

EKCIUH«E UHICM lUD POSITIDHS'' 11,12 

A B C B 

E F G H 

I J h L 

fl k F 



TOO ORI>EAED THE BOARB IN U flDVES, 



PLAI AOATIfT NG 

lOU FLATEI T GAflEG MO OltBEFlEB THE HUtlr » 
AH AVERABE OF tt AOllEi FEB iMi^ 



at 



lae 




In 3 sense, thrs is another game In the 
"gueas a mystery number" fflmily. 
H oweve r, it has qu I fe a d i Ife je nl ' ' t wi st. " 
In this game, you are trying lo open a 
safe by turning or twisting a dial back 
and forth between one and nineiy-nine 
or ninety-nine and one 

The instructions snown in the sam- 
ple rjn are very complete. However, 
one hinl thai will help you wner you 
start playing is that it 1$ jsually best to 
start at ninety-nine when going to the 
right because If you get a click, the 
nurnber must be close. It not. you can 
step It down by eights or tens untifyou 
get the first cfick arti than judge from 
there 

Safe was created and written by 
Kevrn Ashley, 



TurFlinOLofr | Imn-naHlflhr 



tm 



SAFE 

CPE1TIUE CavuTlUC 




NOTE ' iriBrt IS riD Boot D fzera) uiQ 1) epln? 
bock nBBi Ilia '^t' nuiiDar anlamaTH 
eall^a«inmgtU(Ki;B 



ve reii wit imrrToiir' ft5 



IDU AIE * >(J»<ULW tut HfiUE ENC If UiriEKIl A &«rE. TDU hUST 

CPEH Iht SftFf TO 6FT m BtCPET PIUMS TkilT TQU CflflE FOP. 
TD Dfl THI5 , mil ||lf!l EKTCt THE num^ Of UHfll TQU UfllfT IhE 
BTH TUtHED TQ, THE COdPlTtK UILl ACT fiS THE g*fE *ND tllLl 

HELP lau BT e:«iNe a awr of cloe^ tikit is rou inLL'RFiiP- 

A CLICH U ZVtmi SfftCEE NOTCHES AS TOU HQI/E TQ IH PSUfE*; 

(fOnSEf. TIIE« fl»E fOllfr Of THEH lEFIlPF T«£ FlML CLICK IS 

'B&Am-. *FTEfi THE FimL DNE fS HEMB, TOU UILL 60 OH JQ 

THE NEIfT JIUrtlElt. THE CDHPUTEP HlLL'JAr 'CllCIf' FOB EACH 

«TCM fll*T mo PA&S AHD '"CUE"'' UHCr^ TOC REACH THE 

P»DPEt JIIIHBEFr. iP TOt PASS IT OP THt LOJWEH FiWf TEN TRfES 

Off ANT DUE iVinZS, TDU HTIL ACTIVATE THE ALAftPI, 

FEKENIEfl THAT IfHEf TBU T[lflf THE PWL TO IHE LEFT, THE 

NIMBE^S SO FMH I -f? ,AN£ HHEh lOJ GD TO TIC GIOUT, THE 

NUllEEtS EO FAOFl ff-1 

OUT, ST4tT Tl> THE ffl&HT, 5miNlfNr|!l t M I M llliM 

ABE IQIf ITEAITT YES 

OtH. THlfl LET"? STAUT 

' B9 

■- 7^ 

CLICK 

aiGK 

T St 

CLTCH 
CLJCFC 
7 4? 
□.ICK 

CLICK 
CLICX 
'' 35 
CL[C« 
CLItt 

cue* 

CLli:k 

? 3? 

CLirK 

CLJCH 

CLICH 

CLICH 
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T 30 

CLICIC 

CLICK 
CLIG^ 

CLICK 

^ 27 

CLICK 
CLTCK 

rut SEMSQFl HAS BEEH TlTLBGEREEi 
UA^E UHILC VOJ CfiW ff&J^OFfE THE 

PULlCt GET HEftE. 

UUNT TB IRT THE 5<*n£ SAFE^ TES 

ARE ti\} REAJf? TE5 

OEflTr fHEM LET-'S StflflT 

■^ 25 

CLICK 

CLICK 

CLICK 

CLICK 

■T 23 

CLICK 

CLICK 

CJ.ICH 

CLICK 



T 19 

THE StHSIJR HA5 SEEN TRIGGERED 

LEAl^E UKILE TQU CAN BV^fi THE 

POLICE 6ET KEfiE- 

UA^I TO TUT THE SA*iE SrtFE^ TE3 

AEl VOU EEADr^ YES 

TJKAT, THtn LET^S START 

^t CLICK »♦ 

AMD NW TEl THE LEFT 

T 5 

CLICK 

clii:k 

CLICK 
CllCK 
? 10 

■7 30 

T ao 

T 70 

t aa 

1 90 

» ?5 

THE SlNSOl^ HAS SEEN TfrrfiGEftn 
LtflyC tIttlLE Tan CAK BEFORE THl 

POLICE G£T ftEflE. 

UflHT TO TRT THE 5fl*1E SAFE? TES 

i^RE TO J nEflCn TES 

owe, THEN LET-'S START 

^w CLfCK ** 



AJI& MQU TO THE LEFT 

? t 

CLIGK 

CLICK 

CLIGI 

CLICK 

T i 

6 

7 






12 
H 

1B 



+• CLICK ** 

AMD HQU TD THE REQHT AOAIH 

1 93 

CLiChL 

CLICK 

CLICK 

T ff9 

CLICK 

T B3 

4« CLICK **...T01J OFEtiEl IT 

BUT OH.DH, HE HITST HAVE HGVED IT 

TST THE OHE OVER THERE 

DKATp START TB THE BIGHTt ^►fflHHHR 4Mtllll 

AflE TflU ftEADT^ HD 



LI5T 
1 
2 
3 

4 

5 

6 

ID 

2^ 

JO 

40 

5(1 

611 

7{J 



TAB (29) 
TAfr(20^ 
TAKie^ 



■SAFt*' 

TREAT I^iE COHfUTIttQ" 

^HOflRISTGUH. NCU JERSET' 



PRlitT 

FRI«T 
PitlHT 
PftlHT 
Pfi[NT 
RRJNT 

> DIH A1M» 
PRIHI^nO T0tf WANT DlRECTIflttB-; 
IHPJT A I 

IF AI-'^rES" THEM OO 
LF At = "Nfl^ THEN 2?ll 
PRIHT^ANSUEJt TE9 OR HO" 
CDTO ZD 
FRIHT 
PR I HI 
FfllHr-VllU ARE fl BURWJLAfi AHB WAVE EHCOUWTEREB A SAFE. 
fRIiH"DFEM SHE SAFE TO flET THE SECRET fLAMS THAT TGll 
FRWI-TO DO THI5 t TOU KUST EMTEfi T^E HUHBEH Of UHAT 
^BEHT- DIAL IUFeHEI ICt I'HE COMPUTER UILL ACT AS 
RRIHT-HELP "fOO ST fllVlHlj A SSRI DF CLUE^ THAT 
FfilNT'A CLICK AT EI/EHL\ SPACED ilflTCHtS AS TQU 
PHINT-tfU«(R- THERE A«E FOUfl Qf THEH lEfORE 
PR|HT"^HEARII^. AfTEfl THE FINAL ONE IS HEARBp 
fRI«T"THE HE XT HUHBEH* IKE CflttFTJtEft I* ILL 
PRIJiT°NOli:H THAT TflU RA&S fiHB ^**CLlCHit-' 
PRlNT'PR&PER MUMlEft, IF rOU 

PRINT 



90 ■ 
100 
110 
120 

130 

14D 

150 

1&0 

1?0 

18(1 

1?0 

2UI) 

210 

220 

230 

24CI 

210 

2A0 

270 

2»Q 

2tO 

3041 

311} 

32D 

J JO 

34(1 

350 

3fiD 

370 

3B0 

40{] 

41l> 
^:o 

430 
440 
4d0 

470 



VQLi HEIST- 
CAME fflB," 
il^J UAMT THE" 
THE SAFE AN[r U ILL- 
IS TBU UILL^HEAH-'" 
Hfl« m THE PftOPEft" 
THE FCHAL CLICK 18'^ 
Bp VOU UILL SO Ori TG" 
SAT' ^CLTCM^ FGR EACH" 
UHEH TQU REACtt THE" 



PSINT 
FRIHT 
FRIHT 

PRIfll 



ASS IT Q¥! TAKE LDi^GER THAN TEH TRI^S" 
"U¥ ANV OHE HlHeERt ^OU «ILL ACTIVATE THE ALfifiN." 
REHEMBER THAT UHEN SOU TURN THE BIAL Ttt THE LEFTp THE' 
HtJNEERS CD fMH 1 -?? ^^^D IfHEN TCU OC TO THE RlGHTt THE" 
Rl^HBERS SO fejH ??-r 



OKAV, START TB THE RIOHT, 5HHH1|HHi ■ ! M ■ M I- 1 M !"' 
ft=IN^ffHIH1^*81]t1(^ 
i«INTCRNIl{n4BUt1l> 
C^INTCflNttM JtBl^*tB 
PHIttT-APE VQJ KEflUy"! 

IHPOT Al 

IF A1i*VES" THEM Ui 

It AIO"UHAT-TJlEN 990 

primta;b;c 

LilOD-ft 

FBR PI"! TD i 

AHH) = i5-fl)*L^^+A 

NEKI H 

J»l 

PttI«T"l)Kfl^P THEN LET'S START" 

INPUT H 

ON S6fl(H-ft)+J GOTO DO0,5?0|*2O 

Fas K'1 TD 4 

]F M>A1CK] THEN iA% 

PRI JIT " CLICK' 

lEII t 

if J»10 THEN 500 



4?0 

511} 
5?0 
]Ji| 

5^0 

ii^ 

5&0 
S^fl 
5C0 

^01} 
dIO 
dZO 
630 

^40 

£40 

4J0 



TRlaoEMED" 
BEFORE IKE' 



i9l> 

7 DO 
710 
720 
730 
?40 
750 
7iO 
770 
790 
?¥0 



OGTD 660 p 500 ^d 
GGTD i7J},J6«f5O0 



720 



aio 
a 20 

e^o 

OJO 



070 



910 
«20 
?30 
940 
990 
940 
970 



??0 
01 



SDTD 400 

fRlNT'^IHE BEHSGR HAS BEErC 

PR I NT "LEAVE MftXLE TOO CAN 

PtINT-FDLlCE BET MERE." 

PRINT-'IIAMT TC TET THE SAKE 5f{H'\ 

IMPUT Al 

IF AI-"TES" THEH 260 

sore 250 

PftlitT"** CLICK *»* 

L=L + B 

FDR K=1 TO 4 

A1(KJ»K*L/5i-B 

flEII K 

PRINI^AHD HJ]U TO THE LEFf" 

J = 1 

IHPlT M 

DH SSH{H-A?t2 

Cfl a0iHH-BH2 

AcH^lOO 

fDR %*l TO ^ 

IF H<AHKh TH£H 

PRINT^'CLICK" 

AUKf-300 

NEXT M 

IF J>"ia THEH 500 

J-J+l 

SDIO ^40 

PRIHT^rf* CLICK •*■ 

L=(H10-C3+B 

FOR +L=1 TD 4 

AUK?'l>lOO-ll*L/5 

HEXT K 

PRIHT°AHI1 flOla TO EHE RI6HT AOAJH" 

J'l 

IHPUT H 

DM SOHiH-i3t2 6OT0 040^504^830 

DMSGJICft'C?+2 SOTO 500j?50,a70 

HiH^lOO 

FDR Ki| TO 4 

IF J^>AHK} THEH 910 

?fflHT"CLICK" 

AliK>=-200 

HEKT K 

if J>=10 THEM ^00 

J"J-+1 

QDTO 1130 

PRIHI"** CLICK **...T01J QPEHEO IT" 

rRIHT"Bl]T 

pRiarTJtT 

^DTfl 250 
EKI 



DHfQHp HE HDST HAVE flOyEB IT" 
THE DNE £^ilER TH^I^E^ 



13B 



Scales 




lU 



KHCS 

CtEATTVE COriPUTIHO 

HBUiaTOlUr J(Cd JERSEY 



ELEVEN SEALF ll^ES - HiUBPt IIWU, rtDULp W9 UHOLE TOIE 

Tblt pro|r» priilf ■■ l«ttfr i»m bu ociivt upuifd^ lh« lujotr 
lb BitvriLp htmnfCi MJAdiC* tM HvviarlBi nlnorif tAi 

Ihi ■ I- 4r 4-ch*ricttf liput: tbi flnt ? chir^* trt Ih* tcilt 

tfptp iid Iht Jrd thir^r I) the flpglt lilttf UnlCp cr the 

lilt \H £hir^« ara tht iqplc dB^r^l tr th* h*y tijTiatin-F. 

SCAIF TTPE9-- 41 ni hi H do ph ly nl !« hu ind di 

Iipui tUhir t tonic frf l iljnvtim. 

ElAHPUSi flhct lydb iil*b iti^ ^ft higi r*tkl 1o{l dec phd huo 



IHLGJI TT^ Of SCHU IE UUTEIT lihfl 

SCAIE AVKED ~ UhoJi to^t tcalt in Fl 

MUEI Ui liltflr iwiiil 



Ft «l «< »V t 



U 



This program tests your knowledge of 
djfferenl types of musical scales. It 
generaies Tl types of scafes: major^ 
natural minor, harmonic minor, 
Hungarian minor, dorian, phygian, 
lydian^ mixolydian, loQrian, and whole 
lone. 

Prior lo running the program, test 
yourself oil line on a sheet of paper by 
writing down several types of scales 
andSnotesstartingatanoie chosen by 
you Then run the program to check 
your answers 

When you run this program, you wl IT 
be asked, "Which type of scale is 
wanted?" Respond by typing the first 
Iwo letters of the name ol the beaired 
scale followed Immediately by the 
desired key. Uses lowercase b' for the 
Nat and use's' for the sharp. Sample In 
puts would be p/ie for Phrygian starting 
on E, ma^ff for major on F-sharp^ and 
Lvftg for whole tone on G. 

The author, Marvin S-Thosiensonjs 
at the Schoof of Music. University of 
Iowa Scales first appeared in CresUve 
Compuring, Mar/Apr 1977. 



HICH TfPE OF Bfi^lt IS UANTEDt nit 

SC#L£ A5KLI -^ Hat^l HJior %cmU m t 

AMSUfl! (rip Ittttr nnw\> 

C Fl B A B C ■ E 

tHICK iTfE IF aCrilLE K BAIITEBr~Hlu 

SCALE MKlt tihalt t4nv tC^l* D? C 

AR^ItR (it littir vi»#») — 

c D E fl Ab » r 

UKICH ITFE CT 3DAL£ IS UAlTlfD* hu?t 

3C*L£ ASKED Hunf-'n hlBOr fCllt Ofl B 

HfSUEE (111 l*Uer oai^Fi} 

B C> B £■ Fl 6 Al B 



01 

139 



UMTCH TYPE OF 9CM.E U yAHTEr vlop 



lilt 

10 PPTHT 

30 PRliTT 
<e PfrClIT: 



IfC 

am 

210 

li" 

2<0 
2»0 



uu 

PIUIIT 
MllfT 

PtJhT 

PRIJII 

PBIHT 

PR mi 

PfflHT 
PPlifT 



TflllPiJj'Kliltg" 

1*1 < ao t ; -cREflT ruE cqipo r iwe- 

PR I HTt PIT Iff I 
} :tn> I »-0; E =fl iH"0 IK'O :L-fl i » J -Pi1 j JaO 

'ELEVEH 9G4LE TTPES - (WJOB, HIHIJS, fltfML, ANH WOLE TME" 



ifltir i»AHf D>f attavi iipmrif 



■Ihp Bttur*!, hjruOBli:, PtladlC, i>d llul?AriAii -Inors, tdt- 

■Ufl I 3- or WliarJcltP lUpLti the fir,t ! char'i i*^. tl* i» 

■tVffp "fl IM 3rd chli-'r ^4 Iht ti»Tl lltler tailc, nr Ihi" 

-GCALE TrPF9" » d. hi «( Jo Bfl ly nl lo hu »m .ll- 

'■■P4il tither ■ to-K or ■ itgiitiiri.- 

-EHftfLESr nkcb lydb uleb uhgb naf- ha?! i»>4 ]d4^| dw pAd faui 



BUIIl) ■ 



TMEBhlTWtCH riPE OF aC(»LE ]S OHTCC 



T2?fl 



7^0 r>"-^i:flLE ASkEl 

7S0 Cl--lillSilEE Ua litter 

21<i fll""?lff(ICTUR£ 

3VI> HI"-' LttniADrdl" 

2n j>i 

310 ffflll1:Pff|*T:PBINT 
3VI IHMi 41 

30 H'LEPIlAlh 

351} IF fl«'"TlDp'" THEN 

3ftl> £!■■ pan jJi anffflopiiL ynj l Dnuiih" 

370 FQI! K>| 10 2! STEP ? 

If T-EFT|(fl»,?J±Bm(E<,X.JJ WEB *J0 
MEIT I 

All -At 

AOl-CHlrt 1 1 } m I D> < A41 , 2 .FT} 

ffEAD D» 

A9«>AI 

4fr5 If L£PTHII.2>L£fmnO»,?| TIlElf 48C 

SDTIl «3B 

(tE^rajtE 

If no 3 THEil 530 

"■LEfTJIiI,3)*- - 

ff 0-1 Off 0-' M 0-11 THEN S*} 

IE Bl«? ARD 8<=i Off 0<f Oft 0-1* TUSH J« 

ODTD seo 

Fi--i»»»aii4i9:<t:irxMffiaidB3irpriiD e a d « c r " 
F MF I' ■ bftei Ab db qbc &f bfcdtd >ddd ^dc d" 

9l-~B.E<:A'll'bHEMfk:&IEIAiHGaCIFII> E A D G C F ' 
Bt':E I ■ - IbEbAbfibCbflbFbldEdAdDdedCd' 

OR r sors 6id,j3o 

h 1- -5 1 *l J I : t U ? ^ixS 44x JhiJv T I- ^Idl^Kff Jt2a 1 < DM I B2b JblthSbib^b I d2d3d4d-' 
h1-Ht*-adtd7d- 

eolD iAO 

Hi'- 2 1 1 17 (Axa . 4y 3. !. l x7 lUi 14 131211 ROR J billl Jb4bSD4h7b ]d2d344d- 

«t=lll'-SdSd7dad9d • 



3M 

4D9 
11i> 
420 

4]l> 
440 

4lP 



479 
4^0 
4*0 
1«0 
320 
SiO 

i*n 

S30 

395 

5!1 
400 
dlO 
H5 

e:D 



4ii> 

no 

i7t 

a an 

?no 

710 
7?0 
730 
?<8 
7S0 
7i0 
770 
7R0 
7« 



FQfi w=i TO je aitp ; 

TF R|»tlAl,3,;>-ilE[l>tFt,U,7] THEH AOO 

ir rtlDt(Rt,3,21'llJRtril1,U,2) THER dSO 

NEfl II 

T-Tf1 

IF I-? rHEH lldO 

OR T aern '20,740,??OTa4ft,990,?«,7?(,IO» 



i-? IHFh 77( 



eio 
a?o 

030 
040 

BAO 

a;o 



lOAO 

IF fl-4 Ofr 

If- 4 

09 TO 10i« 

t-IO 

SOTO 14^ 

IF Oil OR 

R-i 

aOTD ICiO 



>e Oft D':I1 IJIEH 020 



■7 Oft 



B'lO OR >ll IHEff 87t 



VfO 
920 
930 
¥40 

no 

9i0 

9 TO 

?» 

9tO 

l»»0 

10TO 

1020 

E«30 

It40 

loao 

ID?0 
7073 

iteo 

1»V0 

I too 

11T0 
1120 
1139 
I 1411 
1150 
IIAO 
1170 

lieo 

TIVO 
IJ^D 
1230 
1240 

T?a5 

12iO 

12?0 
1200 

OR 



OR 0-4 m 0*3 OR 0-7 DR 0>» THEH 970 



0^3 DR 0-4 OR 8-7 0» 0-10 THE* 1020 



eOTO 

IF B 

R-2 

eOTD >0«0 

H-12 

eOTO 1«4l) 

IF 0-9 LJR a-1f T+ftrt T20 

R'-2 

l>aT9 lO&O 

il-12 

OHIO 1040 

IF 0-1 

P-9 

eorn lo&o 
ft- a 

eilTQ T0£9 
if 0*1 DR 
B-4 

eOTO ll>40 

R"-10 

GftTH lOit 

ft'O 

IF 0-11 Attn T'l IHEH 1090 

If U-( THEif ll"fll0tl0»,i7'ft,;jf§DTD 

rt-LGFTtlT«,V-i }-ihim&>, i;tR,2 } 

OOTD 1100 

00 TO 490 

fl-LEFllflliUfni" ' 

IF HiriHIt,IJil,f).-d' TffiR I13& 

90TQ 1140 

H=LEFTKH,[l}-"bb- 

l|-U*1 

OOTD Afd 

PRUITlFRINT lAHatpHfJIjEltlPRZRT 

Pftlift lfl»(J);c1iPI|IIT 

PmiTTiPRllfT iaiio);li 

CI|'"lIt=--iSl- — 

fl-Oll<0:R>» 
PRIffT 
eOlO 3fli 

'Hijor scale OH -.'Wit'l nlwir icslf □» " 
-Warit'f ninor icalt on -,-iieTc ^mav KtU 
'Dorlin Bodfl OB "p'Phrvsfin ADdF nn " 



TT90 



BATfi 
lATA 
jrAT4 
DATA 
DAIA 
EHD 



on 



-Lvdlan 

"Mung'l alngr lEtlf 



nodt DB ',"j(iiigiydiQi> ludff i>r ',"[.ocptai nadv on 



an 



'UhDlf LoBi telle or 
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Schmoo 



fCMf 



Schmoos are Imaginary creatures 
who love being splatlerecf with juicy 
mucTballs. You, being a schmoo lover, 
Iryto make schmoos happy by tossing 
mudballs at Ihem, it wjll heJp you in 
p faying ihis game To Know a little bit 
about grids and angles like in the X Y 
coordinate system 2,-3 means right 2 
and down 3. II degrees is Ihe angle 
coincPdmg with the posihveX axis, then 
2,-3 would be in the fourth quadrant 
and wouW correspond to angles 
between 270 and 360 degrees. 

It you're pretty good, you can "splat 
the schmoo " in about efght tnes; but 
don't cheat and use the tormuJa. And 
don't expect me to relf you where It's 
hidden in Ihe progiamj 

If you want to emend the Schmoo 
game, you might want to add a third 
dimension with flyrng schmoos. ThB 
program shouldn't be too bard and It 
woultf be a really neat game. II you 
want to try something easier, fix 
Schmoo so Ibal li requires initial 
velocities as welf as angles You could 
even makea low-gra^'ity (lunar version) 
of Schmoo. 

Schmoo was conceived and written 

by Frederick H.Bell at IheUniverslty of 

Pittsburgh. It first appeared in Crvar^ve 

Compuung, Sep/Oct 1S75. 



SfKniJir 



THIS IJ A -Fl 9Cl'h(H> BWE. SCHBBQS 
Ml IKl^ETHARl LFUIIrGCE MriD LDVE 
BEIHa aPLftlTEL HJTH JIICT IWD IfiLLB, 

THIS, JCJHG A SCHXOD LBVEP, nt ID 

nn^E scHHiia$ hapf^ Jir •nmua nip 

B'LLS fiT Trith, TDU HAVE H 
dECHMICAL HITD 9UIHER THfiT U|LL 

Suns heid td a hah ilk digiaiice 

D' 4S,:Q0 iKCMEt. muP JDP IS TD 
?EI m^ PIU) BLINEIR At IHE CURFCT 
IlFVATlOh CD ID Hh mm IHE CQHrECr 
BTPFCTION*!. AlfSlE iCi TB 360' To SPLAT THE 



scKqan. a nir utteih 

UILL fPLflriEK H3H. 



LDC IVCiCi Q|i IHE SCHJIOff 



COMULNflTES W THE SCtHDO 4ltE f 3(0l>? , TJfiO 



KBB ?LTH5FR fltUflT'ON* J? 
EIRECTlBNill. AITSLE Uh riUI SLIBaE*? 
IQJ niSSEB IW£ SChJWD AT ( 2*50/ , 
ICUft lUH HIT I 3??07 , 33*33 >, 

HBD airiBEir ELEVATIH* 23 
SlKC-llOMi. AN6LE JJF fllll II.1HBF(H 
SOU lUBMH Tiff SCHflDO AT ( 25507 , 
IWlR fun HIT f 28*?| , 1722? I. 



it 
f7iO 



31 

t7SS 



), 



ItLig StIWBFB ElEHTIOBT IZ 
JURECIIOIIAL AhGLE Of BUD SLTHQfr Hi 
ini fllaSED TJfE BCllhDII AT ( 2?JCI7 , 9740 
inUl? rtUD HIT I li379 , UU >. 





AJB Sir JIBE* fUVATlDtfi II 
m*ECTlOffflL Blf&'.t OF nUD SLIWeFST 2» 
1QU niaSEB lilE SCtdrlOQ AI f SJCo? f7j( 



YOOB BUD Jill J 3<352 



J 



IJ^Ofi J. 



*1U[f BLUfSEir ELFVAllOlIt J J 
£I|»£CTE01IAL fiHHf DF HuD SLIBEEir* ?3 

you njisEi THE scmiDB at i !9eo? , ^jtt t 
vm BUI vu ( ?70Be , i?*j[ ,. 

nn SLiKEr EtEVATHWT 2fl 

BlFECTEDlfAL AITBLE OF niTD SLIUCER' 21 

you lll^iJFf THE ^CHBHJ AT C 2»(07 , »7« > 

yeUlr >I4ID HIT I J^H , IBJii i_ 

"lie suna eleuathih' 22 

DlfE^TfOIHl WieiE UF HOD aLTneElf 70 

you nisaep tbe schioo m i 7»bo7 , 9740 ► 
Yiofl flOB mi ( ao3H - n(*7 j. 



dOD SLlJftEP ELElfariUFC 7T 
BISFCTJOItilL ftHtLE Of nlJll JLIdQEr F? 
TQU niSSE* THE 
VIUH HOI Ifjr ( 



SCWDO AT t 7»007 , ?7A0 I. 
lf?i* . TlJ?i J. 



SLtirSEII ELEVAllOrr 70 

DlrECTEDML. A«GLE Of PUD 9LIfiSEII7 FS 
'□U niSSfl TBE SCHPOl} fll ( J9J07 , ?7flD 

yBu» nor kii t ?s'2a , 9?J4 >, 



HUI SLIlreCtr ILEViHTOH* 21 
D»EC1[0«AL A»BLf CTF- 4|||D StTHSClf 
tnu PlaSED TUS scmhbq AI I JPCC? , 
ICirit AID UrT < 2H91 , ?614 K 



??« ]. 



HDD SLlHGCIr Oi'HUQr* 20 

BrRECTlONfll. ANGLE Of dUff SLTBOEBr i? 

too hfSteD TUT ZChma f(\ ( ?9Dii7 , 1?M > 

tOlfS BUD HIT I 2fl2fil> . T7JD ). 

HBD aiLNOER ELEVATEDlT^ 22 
flRECIIQHAI, AiflLE DF HUD SlIHEEF' IS 

you HISSED the JCrfrtua at ( ?9dd7 , t?b<t i. 

TDJt BUB KII 1 3B?2IJ , 9m >. 

HDD Si^EHCEr ELCMIIDII' 21 

Hi PEC Tl DHL AMLF Of flJD SLUfQEB' I7.:i 
yflU I1J3SE& THE SCIrtOO AT 1 29007 , 9740 J 



nun ^LIIEEt FI,FV»I]|JB' 2\ 

niPFCTlOHflL flUBLE O/ HOD SLIUQEHT IB.4 

you nis3E: ihe gcHnoB ae i 2»oo7 , »Jio 

raUH HOD IfIT ( Z¥SZ3 , T821 K 

nJB SLlriBill ELFVATTOlfr 71 

DlPEtllOBAL AKELE OF IIIlD fLIHOEr IB,e 

lou nr«KD iiff scffliOQ at r ?9fl07 . 97*0 

lOUS nun HTT 1 2f«^ , i(|B2i }. 



K 



HID SLINe[R ELF VAT E OK' ?0 
DtPECIIDHBI. UNCLE DF BUB SLlllOEi:' 
>0(J (USSED IHE SCHdElO 4T I 2tflO^ 
IflOR nUD HIT L SajJ? ( 9Si3 1. 



. ?74fl 



riVD SLENGER 
IklRFCTrDVPL 



TOU H'5SEI1 THE SCIfnOO 

moR BUD mr 1 2tbiz , 



ElEOATlON* ?a.3 

4NCLE OF ntlB SLINQEH' Ft 



,B7 



*T ( 2»i>0J , 9?flB (, 
97Bt 1. 



dUD SLCIIBER FlCUflElOB'' 74.5 
EFlRfCTlDHAL AlCLE OF HUB SUHQEff' 
you n]55£It T-E SCHdDO *T t 2ti}07 
TOJP nUD K[T I 2SHbfl , 996i J, 



IS. 97 
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DIRECriOMAL ^ffQLE DF HLI£l SLirieEft? hE*?! 
TETU ti»S£D TH£ SCHilQO flT ( 2?0I7 ^ fJdC ). 
TOiJR HUD HLT i 2?{lFff . 9^6 >, 



mw 5L]lf6ER ELEVATIDtt^ 2C>.fi8 
DIRECTIONAL ANfiLE OF HUB ILINaER-^ IS.i? 
YCm hCSSElT THE SCHttBQ ftT ^ 290D7 ^ 9JiS 
TDtJR ttUn HIT I HlCH , fB^t I. 

nun SLEMGEFT £LEi/AT|ONt 20.^ 
A[lTECTIfltiAL AN&LC DF tiUIl Sl.]HI:£]fT 3ft. ?T 
TOO HISSED rilE 5CHHO0 AT ^ 2?0fl7 , ^741> 
fQUH flUn HIT ( 2f10^ p 9frSA )« 

HUB SLINDE5 ELEUATHH' 2A.42 
DIRECTIQilAL Affljl.E OF HLJD SLINfiEft? Tfl.71 
*SJ:HnSK} SPLATlfD* 22 HUD BALL3 TDtSEJ. 



:. 



I SE£ AftaTH£|t 
Hlh, TTfE HUD. 



«ID 



JCHHOD, TO BPLAT 
TD milT, rtPE OUIT. 



CODl^DINATES GF THE ^CHHOO AHE [ 452? , ?IJ? h 
THE SCHtlOO ra HftfF-T Tfl BE SPLATTEB, 
TD HAKE fOU ttAPPY TUD, 
HE UUL THfiOH HUH AT TOLI. 

HUB SLINCEfi FlEi^flTraH-* 47 
DirrECno^TAL anqu df hub SLiNitter? 47 
TQU rtlSSE& THE SCHHQJf AT [ i529 ^ T]i7 ?. 
fDUR HUD HIT ^ JfiJS , 33^2^ K 



SCHHOD rtun HIT 101B THCHfS fBOH lOJ. 
HUD SLI»t[?EJr ELEIJATIRNT 10 
II[R£CTie]NAJ. AHflLE DF HUH SLUfGfR-^ A7 
"rOlJ HlftSEB THE SCHIflD AT ( 65^9 , S}i7 
^BUR tlUD HIT i T0S45 , II^A) ). 

BCHHBQ Hrj& HIT PIU INCHfS fROH TflU* 
HUD ^LINGER ELEliariDT^ 7 
DIRtC^IQNllL AMOLE OF HUB JLINflER? 31 
iDU HISSEU THE SCHflDU AT < i52? , 9[d7 
TJlUff HUD ttil ( 707? p B?42 Jh 

4CWHDD ttUD HIT 1151 IHCJ^ES FROH rDU- 
tiUI SLlHSElt ELEVATJOH? 7.^ 
DIRECTIOHIL MBLE DF HUH SlEhOERt 54 
VOU niS^E£ THE SCFfnaO At t ^579 p ^l^:" 
TBUfl *H3II FJIT f i7?7 , ?iM ». 

SCWHOD HOI HIT 7eJ IHCHES ffiQH fOU. 

HUD ^LINGER ELE^ariDH^ 7.1 

DIflECTIONftL ANDLE (IF HUD aLIHDER^ 53.2 



^. 



TDtl HISSED THE SCHIOD AT i 
'(f^^K JIUD HIT t. A8^2 p ^]31 



i529 , ?|fi7 }, 



&CIMDO HUD HIT Ul MCHES FROH fOU, 
Ml BLEHSER ELCVATIDfl* d.? 
IllRtCTIDHAL ^H6LE DF H^p SLIHOEH^ 5J,Z 
TfflJ HIBSEB THE SCHHDO AT C i5J9 p ?I47 L 
TBUG HVD NJT [ 4A43 ^ SSfiD h. 



vou. 



3LHBDQ HUB HIT 38^J IHCHES TROH 
10D $LIHflER ELEVATIQtff 4.S? 
DJKFCTjuJjflL AMGLE Of ((UD SLIUGER^ 33.* 

rau c-JSsED The acHfloo at t itJ2» , ¥ii7 r. 
YflUR HUD HIT C ti^^J p BB?2 K 

3CHHD0 HDD HIT 750 lilCHES fHDfl TOU* 
HUD SLiNDEir ELEVATIOH^ d^gi 
DIRECTCDHAL flHGLE OF HuD SlTrfCER"? 53.^ 
TOU flI&SED T«E aCHflDO AT C fiS^? p »16? ?, 
^BUfi HUD HIT [ 45*S * ^872 ?- 



SCtfflOQ Hfit IfiT 121? CHCHEG FROfl TUU* 
HUD HLJKGER ELEiJATID^T 4.^1 
£I£ECTEirNAL ANOLf OF ttUD SLItJGEET 53.S4 
TflU H[55ED THE 3CHH0a AT ^ d5?? , ^Ti!? >. 
TDUFr HUH HIT ^ &AOd p B?33 ].. 

5EH^Q0 tlUD HIT 157? INCHES fROH rOU. 
HUB SUtDER ELEVJ^TIBH? 4.99 
DllECnOlM- ANGLE DF MJ^I ^LlHBER? 53.52 



TOU JII^SCD THE SCHtWD Al i 

TDUR HUD HII C &5B^ , £905 



i529 T 'Ttf >. 

3. 



T»te SCKHCD Hft& E^LATTEB raU' 
CLE AM Of aitB BDOHBTE^ 



LIST 

iq PPlrfT 
PRINT 
PRENT 
PHtHT 
PJITRT 
FflINT 
PIllNT 
PHENT 
PRINT 
PRINT 
PflINT 
F*JHT 
PRINT 
PKINT 
PIIINT 
"[NT 
PRINT 
PffINT 
PRIHT 
PRH*T 
PRI^T 



2<\ 
21 

j: 

23 
iO 
32 
34 

it 

4D 
4J 
44 

44 
5D 
56 

40 

70 

75 

9D 

IDD 

11D 

1?D 

110 

1d£ 

139 

14« 

145 

t4G 

1 3D 

155 

155 

140 

IAS 

?D0 

31D 

22D 

23 P 

24i] 

25(1 

2M 

3ID 

310 

320 

3^0 

350 

3JP 

352 

35^ 
JSJ 
34 D 
341 
342 
344 
J44 
37D 
3B0 
390 
3?5 
4 DO 
41D 
415 
41? 
41B 
41? 
4ZD 
50D 
5fl2 

5C4 
5211 

540 

S5C 
54D 

57D 
580 
590 
595 

59£ 
4ID 
A2D 
43D 
A 44 
6 SO 
700 
710 



TAB(JO}; 
TfiBMl];- 



■SCWIDO" 
CREATI^Jf 



CDHPUTIRD HQRRISTUUN NEU JEHDEl" 



'^tpfi; IS A HEH SCHHDG Gi^HE. gCHtlOPS'^ 

■■ARE IHAQIHARI GREAT UAE4 UHU LO>JE' 

^Btl^O SPlAlTEff UIIH JUICT HUD DALLE." 

"TOUp SEEilD A SCRHGD LDVER, TRV TO" 

"HAKE GJ:Hj1DG5 ftAPPV fir TOS^IHQ HUD" 

"BALL& AT THEH, TDU HAVE A" 

"HECHANICAL AUD SJ-II^GER THAI UILL* 

"SLCMO HUD TD A HAJIIHUH DISTANCE" 

"OF 44p5DD UCHES. VGeJR JOB IE Tfl- 

"SET THE flUD Jl^NtEfl AT THE COffRECT" 

^ELEWflTIDN Cil TD ?0h AHL THE CDfiRECT' 

"DHECTIDNAL ANfiLE ID TO 3401 TD SPLAT THE" 

-SCilHUD. A HIT UlEUJH IQO IHCHE5 Df IK 5CHRDD' 

■UILL SPLATTER HIH.* 



n 

EDTO t3DpHOpllq,]40 



K1=0 

i'INTnt-RHD(nt4-t£-C 
DN Z 

fl"-t 

BQID 

f"-1 

11 = 1 

GOTO 

F^E 

8—1 



30» 



205 
P = l 
1-1 

13 ( IH7C74DOO*RHII C 1 h04^D » »*P 

T=i 1^1 4 ^4D0Oti:HI] C I }f5DaOJ rvt 

5=1] 

KI*K1+I 

IF Kl < 2 THEN 400 

R=IHTi7*RUDn?+5l 

UDTD 400 

F*IM "THE ELEVATIOM HUSI BE BETiJEEH I A^D 90.* 

QOTU 5 DO 

PAIMT "Drf^ECTIDHAL AASLE HEIST H FEOH Q TO 3£(l.'< 

QOTD 500 

PfiINT "f^EHHOO 3PLATTED*"rSi- HUJi BALLS TOSSEH." 



PRINT 

PRINT 

PRINT 

PRINT 

INPUT 

IF M = 

STOP 

PR]NI 

FRIHT 

PRIJtT 

IF n 



■I SE£ ANOTHER SCHHDD. TD SPLAT** 
■Hlfip TTPE HOB. TO QlflF, tTPE BUII," 



■ttUIl" THEN MO 

VDU fllBSEI THE 
YDUR HUD HIT V 



SCHHOa AT r 



f^;' 



^T;'k 



;iHTaiJ;"p"riHTIVl];->.- 



^ ? 



50fl 



TNEH 
IF S >= fl THEJ! 
PSIHT "SCHHDQ HOD HIT " JRJJ 'AJftHEB FRDft VOLI*' 
GDTG 5{I0 
PRIHT 

-CCORDIilATEE OF TnE SCHHOD ARE (" pI^-.TY; - ) / 

< 2 TttEH 425 

■THF SCHHQD [5 HflRPT TO RE SPU^TTED-" 

"TD HflUt TDU HfifPf TDDt" 

'KE HILL TMQU HUD AT yOV.-' 



-HUH JLI^QfR ELE'JATiaH 



kq 



■DLfiEGIIONAL ANOLE Uf HUD SLIHGER' 



Bfl2 
9{]0 



PRINT 

IF K1 

PRINT 

PRINT 

PftlNF 

PRIHT 

?RI«T 

IHPJjr 

fRIHT 

IHFUT 1: 

IF 1 s 90 THEH 70fl 

IF B > fO THEN JHO 

IF fi < 1 rJiEJf 3Da 

EF C < D THEH JJC 

IF C > C34O-{1E-0eM THEH 320 

3 = 541 

LF HI < 2 THEM ^99 

R>]HT< AB5^ TOiJtRNDn >*f 1 t-a*5t 34?0 h 

J^3. 14159 2£,E35»/TBfl 

B=JlB5[]HTf930flD"*SIH{B+J5*COSH^J?H 

Xl =D+CDS4 J:*3 .hi 592&533B/1 bo? 

V l-D*SIHtC*] . I A 1 1934535#/iaOJ 

D]'5RRaj:-xir2*fr-ri>^?^ 

IF 10D >= B1 THEH ]}0 

DOTD 342 

PfilHT -rOU IIDPEi TOU 5fL*TTED TOORSELF.^ 

SOTO 9011 

fRIHT *THE SCHHQO HAS SPLATTED fOlfl* 

PRIHT 'CLFAH UP ri^HD DOOI^BTEr' 
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Seabattle 



The object of Ihe game <jt SEA 
BATTLE fs quite simple. You are a 
submarine wirh a mission to seek out 
^nd destroy all oE the enemy ships jn 
yojr area, using whatever means are 
available. This Includes torpedoes, 
Polaris missljes, sabotage, and suicide. 
The enemy, in turn, throws ojI depth 
charges In an atlempt to destroy you. 
There are also some underwater mines 
which have a nasty habit cf blowing 
you up when you run into them Other 
hazards are some very hungry sea 
monsters furkmg about who have a 
taste for submarine sandwiches. 

I started writing this program two 
years ago. and finished my last 
iTFOdilicaiions fust recently. Of course, 
this doesn't mean r worked on it 
conllnuousfy for two years. There were 
some long 4-6 month stretches when I 
didn't do anything to il if started out as 
a very simple program, and I just kept 
thinking of things to add to it. 

I am currently a senior in Simley 
Senior High School in Inver Grove 
Heights, Minnesota, and am IS years 
□Id. i have been working with com- 
puters since the ninth grade, and have 
uvntten many programs, including this 
one. 

This prograrn always draws a crowd 
in our school computer room, even 



Jrom I(rd5 who don't even know which 
endofaJeletypetotypeon IbuHlevery 
possible inconvenience into it, to keep 
people from winning too easily. I am 
happy to say that when a person wins 
now, it's headline news. There are 
always muMered oaths to beat the 
computer r\e\i lime, and this alone 
brings me more enjoyment than play- 
ing the program. 

As you can see, the program Is quite 
fong. and initially I had some storage 
problems, as I'm sure many of you will 
have, too. All I can say is to slice away 
at some of the more trivial commands 
and options until (hopefully) you cut it 
down to a reasonable size. If compiling 
space IS a problem, you may have to 
divide the program into subprograms 
chained together. If you don't have this 
capability, you'll have to brainstorm 
your own ideas. 

Here are some of the anomalies our 
HP 2000 system. Stnngs are dimen- 
sioned <rom one to 72 characters in 
length. Positions on the string are 
identified with two numbers. Ex. 
AS(2,4) A$ is the name of the string. 
The 2 tells the computer to begin the 
Bubstring at the second character. The 
A fells the computer to end the sub- 
string at the fourth character of A3. So, 
AE[i,i] allocates the first character of 



A$. I used this lor identifying 'V and 'N' 
In yes/no responses. 

Line 590 is an example of logical 
operation. It tells rhe computer that if 
the expression is nonzero, to proceed 
to the line specified. If if is zero, it will 
fall through to the next line. 

A slightfy different type of logical 
operation is found in lines 302Q-3050. 
In these Ifnes the logical quantity is 
evaluated first, and if true, the quantity 
is set to 1. Ifitialalse, itissettoO, These 
can all be raken care of with IF-THEN 
statements if necessary. 

r hope that the size of the program 
does not scare too many people away, 
U should be able To be made compafi- 
bfe with very little re wniing. If you have 
a few hours of tree time to rewrite a 
little, it should be worth the effort 

I tried to throw a lot of random 
statements In there to make playing the 
game more uncertain. Cutting some of 
these oul may save some space, if 
that's a problem for you. 



Note: The wrileup above, by Vincent 
Erickson, refers to the original HP 
version. The one presented here is in 
standard f^icrosofl Basic. Some con- 
version notes by Sfeve North are found 
in the Haling, lines 90-230. 
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mrs IS the; gahe pf ^£a &flTTLCF the object or thf game is Tn 

&E3IRDV ALL OF THE E^E^Y SHIPS fN YOUR ^0 RY 20 APEft SlTH THf 

HOyE^ER, ^rTHDUT LETTING THE E>^EUY DESTfio? ioU ^IPStI | ' 

THCRC ARE SPyCRflL INTEREGTIND HAZflRH-i IM THE GAME, TMEY IHCU'JDF' 
.. DEPTH CWflptES FROM NEfiJ^&Y EhlEMV SHTPS- -"-"-U^JJ-il: - 

>> WEPy HUNQRY SEf MUNSTERSII 
,- l,Ha HiriliEN U^DERUJlTEfi rilHES. 

THE GfiPTH CHrtJtOES ARE EFFECTiyF TO UNI DEPTH. BUt THEY LQSe 

^lirLiPsf fiE^^BlTT™ °'^^''^'^^- ^° ^'•^ '^'^'^^HER YOL. ARE f^O'i 

THE S?A M0NSTF&5 TflK= fl HEfiNrERlMG CDUJV^E THJ^GUtH fOUR flRffl THAT 

^S^v'S,'^^ /iKF^Sn^ ^^^""^^ '° '^'"""^^ ■'°''- ^-^^ '^^■'I'EL, =tJRSl'=. 

TWeV *.U30 LIKE TO EAT YClUff TORPECO5- BUT rtZSSILES ULLL lLZl,L THEM. 

fDir HflUE TEfJ DPPERS THAT YOU Mi^iY OIVE- They ARE: 

40: NfiyjGATTOH - THIS COHmitD ALLOhS YDU TO rtQiJE li^ A 
PAf^TICULflP DfPECTIDH fl^Ii BI&TrtffCE ACROSS YDUP ,:^REA- THE 
U 1 2 DIRECriON IB BfTERMH^ED BY THE GRPPH ftT LEFT, THERE 

\-/ ARE a DIPECTIQNS TD HQUE IH. AND THEY AfiE THE SAME 

?-*-3 ANYTInE .OU ARE "flSKEE FOS A COU^SEh FDR EJ^AMPLEp 

/'\ TD MOVE rfORTHr YOl] UDUID USE COUfi^E #J . THE COMPUTER 

6 5 t UIJ,L ALSO PE*^ FOR PfJ flriDUHT OF PDWCft. IT TAftFS 100 UNIT'^ 
OF PDi^ER TO MOL.E YOiJR SUft 1 SPAC£. BELdAR£ OF OESTflCUFi 1 1 
IF VOU USE MDPF; than lOijHj UNITS IW A TURH, THERE IS flH 0^fERLQflD 
DANGERP SO BE UERY Cf^tEFtTLiI UVfcRLUflD 

*v: SONAR ' THIS COHMfiNIi HAS TWO OPTIQNSp OPTION H GIVES 
OIRECTIDHAL INFORMATTONt SHOWING THE &1:RE;cTI0NS AW EISTA^CES 
IN tlHlCM THERE Afi£ ENEilY SHIPS- 7HI5 IS USEfUL FOR SHDOTIHC AT LOMG 
RA^-OES- WHERe IT IS BlPflCULT TO TELL If A SHIP IS IN LIRECT Lll^E, 

OPTIOhJ #0 f-PlMTS DOT A MAP OF YQUR AREA SN A SQUARE. 
riT USES SYMBOLS FOR THE MAP) '•' INDICATES &fir LAN^p ■*' JS 
AN U^ERUATER M 1 NE p -\S/' T5 AN ENEHY SHIP, '-O^' JS A SEA «ONST£R, 
'■HI' 15 YOUR MFA&OUARTERS- ANP FINALLY. ' tXt ' iS YOU|i' 

EUERY SO OFTEHp A '-'.MILL APf£AR IWBZDE THE SCREEH- THIS iS 
fi SDMAR MaLFUWCTIDN. AND SO THE OtJECf THERE ISN'T IDENIIflCD 
IF VOU ARE ABOVE 50 FEET. liJA^JES UILJ. SHOU UP AS '.'. 

t3: TORPEnO CONTRQI, - THIS OOrtMANE ALLOUS YOO TD -^HOOT 
1 OF VOUP 10 TOFJFEDOS AT EMEMY SHIPS- THE COMF'UTEC WILL ONLY 
REQUIRE THIl [iIRECTIOH TO SHOOT- USIHG TMt If^DICATOfi ABOVE 
TMEY HAVE A RANGE OF 7-13 SF'ACES, OHE TDRREDD GETS ONE SHIP, 

43: POLARIS MISSILF COWTROL - THIS COMHANP ALLOUS IHI} TO 
LAITNCH DriE OF YOUR POLARIS MISSILES AGA!N?;t THE ENEMY. THE 
CDPPUTEP tflLL i.5K FQR A COlfRSE liHD FUEL, IT TAKES 73 LBS- OF FITEL 
ra BOOSI A MI55ILE 1 SPACE, SINCE THEY ARE 50 MUCH HOPE PDUPRFUL- 
THE'i' UILL COMPLETELY DESTROY THE SPACE JHfY LAND ONt PLIJ£, ALL 
OF THE IflHEDIATELV ADJACENT ONES. MISSILES CiESTROY EVERYTHlNGMi 

fAl MAHUEyERINC - THIS tOrtMAND ALLOWS YOU TQ CrtAI^OE rH£ 
DEPTH YOU'RE AT- YQU rtAY WANT tO PO THIS ]F YOU ARE BAti]. r 
DAHACED, PECAUSE PEF'AIRS BO ON TWICE AS QUICKLY &ELOU 

2500 FT. AhJD ABOVE 50 FT, THAN If BETWEErj, YOU START THE GAME AT 100 F l" 
YOU USE UP ABOUT I ROUER UNIT FCR EUERY 3 PT. YOU CHA^CE- 

(5! STATUS/DAMAGE RFRORT - THIS COrtMAHD GIVES VOU THE 
STATUS OF YOUR SUP- IT TELLS YOU HOU NUCH IS LEFT lil YOUR 
AR^EHALt iJHJCH ITEMS ARE IiAnAGED, A^O HOW flUf-H- 

■*4r UFA&OUARTERS - THIS CQMMAJ^B ALLOWS SCUJIA [rlUFRS FROM 
YOUR HEADOUARTEPS TO REPLENISH YOUR SUPfLY OF 4JEAPDNS AND MEN, 
YOU MUST BE AT 50 FT- OR LE5St AUD 2 OR LESS SPACES AUfl f TO &0 
THIS HOUEUEP- A^D YDU CAW ONLY 00 IT TmCE. 

t7l SAPOTAGE 'SCUBAS - THIS CDMhAMO AU(,OliJS YDU TQ SEWO 
ME« OUT ON A SAHOTAGE MISSIOW AGAINST EHEHY SHIPS, YOU HflY 
0«LY GO AGAINST SHIPS WITHIN 3 SF'ACES OF YOUp AWD YOU PIUST 
LEAVE AT LEAST EO MEN ON BOARP TME SUE: TO RUf* IT> 

*B: PDUER CQNVERSIOJ^ - THiS COMMAND AJ_LOUS YOU TO LHAWJ^E FUEL 
TD POUERt or UlCE-VERSA- 

#9: SURRENDER - THie COHHANO 13 ONLY FOR COUARDS AND TRAITaRSM 

YOU START THE GAME WITH THE FOLLQUXNO SUPPLZES F 

6000 UnZTS OF POWER. ^500 LBS- OP ROCKET FUEL- lO TDPPEDOS 
3 MISSILES. L WEAPOUARTERS, AHU A RANliOH NUMBER QF SflJFitp 

t LEFT SOME INTERESTING OETSJLS OUT OF THE INSTRUCT I0N5» 
ro MAftE PLAYING THE GAME THE FIRST FEU tJMES MORE INTERESTING, 

YOU START THE GAME IN THE ISLAND'S LAGOONt AND IT IS YOUR PUTY 
TO SEEK OUT AWD DESTROY THE ENEfiY AT ALL OOETSi 1 1 
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SEA BAT 
CffEflTl'^t CBHPUriHG HDRBI^TOUll, flElf JERSET 



UNAT 15 TOUR NAN£T CAfTAtH AtiAt 

TUa MUST DESTfiCT IS E«HI &HJP5 TD UlJI CAFTAIH AHA9. 






\a/ 



\8/ 



\sy\s/ 



\a/ 



\s/ 



Hi- , \s/ 



\3^ 



\S^ 



^S^*44**4*** 
+«*t44**4 t«4*+4 

t*rf4* {Ml v*4 

••*»u ****** 

****** t«4 

\3/ 



V8/ 



1 






UKAT ARF rOlJR OftMRS CdPTAirt AK«Br 3 

DDURSE n-d^Y 1 

FU£L CLBS.)? 4S0 

TJiU DESTTTfl^Ett ? fwEflf StfirS CAFTftlH flPWBi" 

□ tPTH CHM^GES OFF ^TARtOARIt Sli\^ CAPTfilR AHABIU 

LIBHTp SUPFftFTCTAL DAHAQI CAPTAIN AIMB. 



— M* RE5UU DF LAST EIJEHY KANUEVEfl ***- — 



UKflT ARE TDIR QRDERS CAPTA1H AKAB1 1 



, \5/\SA3/ . , M/ , 



, \8/ . \S AS AS AS/ 



h 

. t 



^*t*****t -i" 

1 SS/ **44*4****^ 

******4** A»t*d*4 

****** (X) *** 

*•*«*« *+4*U 

****** t+t \i/ 

■ *+* 

mi 






\s/-#- 



URAT ARE n^9 ORIFftS CAPlAlH AHAB? <l 

POUER AiMILAlLE= 3^0 . POUEff TO DSfY 2W 
^AVTGATIDH COnPLETE. PDUEfl LEFT- SiKt » 
ITEPILJ Dtii^t^GL^ UhT n^t 51DC CArTAlH iVlABMI 
LJfillT^ SUKBPtCtAL »AHA6E CAPTATH AHAB. 



---•*t MSULT tf LASI EKEFfT HAiftJEVER *** — - 
*** ShICP MSTffOIEB Bt A J4IHE CAPTAEH AJ4ABM! 
• i* SKIf EATEN BT A SEA JiflHSTER CAfTfllfl AHABM 



tIANT 9AHAGE REFDRT^ TES 

ITEfl DUtlASE <t QMfF^ HUETtAL, - Bdl^l 



EJIBINE& 


-.B&fl£57 


SOMAR 


].58¥?7 


TOflP£D05 


i.??9i? 


MISSILES 


1,57305 


nA#UEIJER[ifS 


3.122063 


STATUS 


A,543Sf 


HEABDUAMERS 


2-¥0217 


SASQTASF 


J,B2123 


CflRIIERTER 






V9tl ARE AT LDflATIflM t 12 . Ifl ), 



WHAT ARE TDJR MIiEtS CAPTfilH AHABT T 

, > ► ^3^ . \9/ 



- ^3/ . 



* ^3/ 
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\s/ 














\B/ 














\s/ -t- 
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\S/ «MH**t« 
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*i4***4t*t*4 
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**t*«*V*V t44(+t 
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■^3/ 
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\3/ 
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\i/ 














\&/ 
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1 
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F V 
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P V ■ * * 



UifAT HE TDJR URBEITS CAPTAlfl AHAB^ 
EJ(&IAE& ARE UfllER REPAIR CAPTAIN ARAB. 



UHAT ARE raUR QRBERS CAfTATH AKAB7 7 
HQ SHIPS IN RAflGE CAPTAIH AHAR» 



UHAT ARE rDUfl OBBERS CflPTAlH AH AS? A 

riEU :»EPTHT ?e 

HARJEVER CBKPE.ETE, P^ilER LDSS^ 23 

ilEFlfl I^KAFtltES OFf PDRT 31BE CAPTAIK AHARni 

LIEHTt SUPERFICIAL BAAAGE CAPTAIN AHAB> 



---*>* RtSlfLT or 1_A^T EKHf flAHUEiJER ***— 
*** SHIP DESTflDTEB &T A ^IHE CAFTAEH ANABiM 



IMAT ARE TOUR ORffiRS C APT AIM AIUBT 1 
DPTIQif I? 



* \S/ . SS7 - ^ 



. ^a/ . - , \B>\3AS^ 
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\if - -B- 










\^f 
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f ************ 










I *4P*t**** V4t«t4 




vs/ 






****** ***. 
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****** ****** 










***+P4C||?4*« 










*t* 
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in 


1 




b ri 








\B/ 




« < 






-H- 




w 
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b ■ V ■ ■ 



UKAT ARE TflJR BRDEAS CAPTAIN AHABT 3 

B OF EH£HT SHTPG LEFT.^^^..^ U 

It OF PNER UNITS L€FT ^SM 

n OF TDI^pPIUfS LEFT-.*,„^,„ 10 

» OF NiSSlL£& LEFT 2 

B OF CREHJfER LEFTb... ^. 30 

LJS. BF FJEL LEFT....,.,^,^^ 2eS» 



UHAT ARE TDUir DRkERS f APT AIM AH ART 

tt Of ENEMT SHIPS LEFT,> H 

# Of POUCR UNITS LEFT....... 3123 

» OF TeRPElD3 LEFT 10 

# Df RrSEILES tEfT **. 2 

# DF CREUHEN LEFT K 

LJS- BF FUEL LEFT 2050 



-iAK 




"" ITEMLI OF LflBl E(f£(l( WnEVtS *<- 



llJr*T ARE imiP DBDEP; CflPTilin AHAB* H 

COURSE ll-Hh- J 

POIIEB *VfiILflBL£= J021 . POUEff TQ USE' 50Q 

NfiVJBHIIDW COHPLEIE. PaUE« LEFT' MSI . 

in SHIfa Iri RflJHJE 10 OEPIH LUflflBE IDLI Cflflfllfl AHABM 



— •■" flraULT Qf Ifl^r EJtEfll SAhUEtJEB tH 



WHflr BPE TDUfi OlfHlf9 CftPTflih flKAB^ I 
trPIIEIll Ml 4 



\S/\S/\S/ 



iH 
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*tt+*4*4t 












t4*****44*^t 








> 




4***4*4 ftp 


t4*f4^ 












1***** 


»**» 
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*t*f*t 


**+**♦ 












t**4*t 


*t* 


b 








-t 


*•* 


-1- . * 


< 




- > 




































. » 






^ b 


■ * 


b ■ 


V I b 4 


f 


b 4 


■ P V I 



UHAT ftJIE TOUf URDERS CAPTAIN ANABr 

^llltEft liV^ZLflBLE- 1471 . PttUER TO USEf JOfl 

HiWICATlDH CflHPLETt. PQuER L£fT= tJ71 » 

H» SHIPS IN PrtN9£ TD IEPT|f CHAIfCE TDU CAPTAIN AHAS^l 



*** irESULT" OF LAST EHEflr rtAttUEUEJl #*4 



UHAT AAE TOUP OffBERS CAPTniN AHltBT T 



(If - b . , \3/ . . ^3/\9/ 



-i- 



****44^t* 
|*1*4«*«***+ 
V*****4*4 *titt44 

*t*n» 4*4 

*^V*t^ 444 

**4 -■--#—■- 



1 

a 



I 4 
4 



UNAT ARE TOEJft Dll&£ltS CAPTfllN AHAB? 3 

CUtlftSE n-tJT 3 

KltEt ^flS.fT i75 

THJ iiESTRIYED ! El«£nl SNEFS CAPTAIN AHAE^i 

NO SNIPS IM RANOE TO HfPTH j;}1ARGE TDU CAPTIlIH AMfllH 



•*• BEBOLT Bf IA5T ENEflT NANlfEVER t44 — 



WAT ilfif "tm^ URMftS CAPTAIN UlflB* 2 

Ci?Ufl3£ tt-&)T J 

..!-...1-„.|,.,.L,aiH:K!ii VOU GOT ONE CAFTfll! 

GDQtt 1I1?ITK CAPTAIK AHABM ^ TOtJ 001 THEH AU.iM 

PHOrtOTIQJf riN0 CllllrtE«IiflTIONS HILL BE QlVEN mHEJHftTELT ! 1 1 
UMT AHQTNEft DANE-^ Hfl 
Bf4bIl in iJitk 
Dl 



ID 
2^ 
30 
40 

7D 



COJIPlfTlBE HDRfilSTHUH^ MEU JEBBtr 



J^RTttT TA»f335T-8EfitflT- 

PRINT TflBll5^;"[:fffflTlUE 

PRfflTiPSmTlfRIWr 
(l£n 

PAQ&RAN IT VINCENT EREH90N 
ORIDIMfiUT [4f H.P. BASIC 
COHVEftTEl TQ fllCRBSOFT BASIC BT S-Hb 



90 
100 

no 

124 
l^O 
144 

151} 
UO 
170 
ItD 
nj 
?|}4 
21D 

230 
240 
?*! 

J^H 

2fl0 

3P0 

300 

390 

320 

122 

J?* 

J2A 

3M 

330 

3A^ 

J^O 

310 

370 

JBD 

3T9 

4»G 

410 

47D 

4J0 

440 

450 

440 

470 

400 

4?0 

500 

510 

tS30 
540 
SJO 
S40 
570 
SBO 
5?0 
600 
dIO 
670 
A SO 
d40 
dSO 

6^0 



RESiDfit aiil£ «tJM£fl? flEftttS TO 361 THE DATfl 
POINTER T& THE SPECIFIED LJNE. THIS IS OWU 
PflEBEHT IN l<:5"B0 LEl-El IE AHB CP^rl fiflSIC. 
FOR QTNEftS^ IJSPRDUISt St JSIttfi ft BEaTQRE, AND 
FDR^^.tfEJT JITH REAI^ 5TAT£*IENTS TO SKIP OVER 
THE OATA TNriT 9H0ULB IE IONORED. 



710 
?!0 
^30 
740 
7S0 
7&0 
?^0 
7ffi} 
7?0 



80? 
80 ( 
810 

ejo 

?J0 

e^o 

^30 



LDfllCAL ErPRESBlOWS fl*r£ USED QFTFH, A TRUE 
EXPRESSION EVALUflTEJ AS A {-}) ANO A FAtSF FHPRESSIOI 
EHflLUATES AS A 10), THUS IF THE ^RDDRAN SATS: 

iC * CB<JO> 
IT HCA^Sp LfT X=-0 IF Bi^^SOp AND LET H*-1 IF D<50. 
ASAIIfT INPRDUESt IF TOUR BASIC DOESN T HAVE IHH 
4BUT ALL ACCffClJQFT BASICS BO,^ 



Thv real nanfl af tM4 
t4T FROSRAH FOLLDyS *** 
*«t 

AC?0f2O?p[PC*S 

"UHAJ 1^ TDUR tflHE"^ 



EEH 
ECU 
REM 
REH 
REft flUTE 

REfl tl 

REtf 

REH 

R£H 

BER 

REN 

REN 

REH ?] 

JrEfl 

KEH 

SEN 

REN 

REJf 

REM 

J^EH 

flEH 

REfl 

REH 

OIJI 

PRINT 

INPUT 

PRINT 

REM •*• SET UP 4tR£A *** 

FDR 1^1 TO ?0 
FQR J^l TO 20 
A{ItJ}=0 
NEXT J 
NEXT I 

REfl *** ISLANH *^4 
RESTORE A 100 
FDR i:-7 TD 1J 
fOfi y=7 TO 12 
flEAB AIXpT^ 
*1£XT T 
NEIT I 

REn *** SHB 1«4 
E1=1B: 32-10 
ACS1pS23i2 

REN *4» EHEHT SHJPS M4 
5=INTCRH[li|>*1&)t-l5 
IIE6T0IIE 4090 

fDR X=3 TO 1l^fTIRNt^h44)+1h*^-1 

REAB BS^D! 

jiEKr X 

FDR J:=1 to 3 

JC1^lilT(ROn?*201+-1 

f7^IilTCflN1l1n42D^t-l 

TF ft(?;i^S2Kj; THEfl 300 

A(X1pX2]>J 

HEIT I 

FRIRT "lOV HUST DEJTRaY';97'EHEnl 3lllf» 

REN *4^ ^ABflUARTFRS •*• 

S3=1HTlRJIBn]^70rt1 

E4''IJfTfRilJCn420h«1 

IF AfSJHS4K>0 TTIEH 370 

AC33^54h^4 

RE A «M IRDERUATER HTHES »* 

FDR 1=1 TO 3lrTlR4lBC1^*eJtl 

i!|'!llT[BRD(n*20>*1 

X7=INTCHHD(lh*20]t1 

If fl(KT,H2>O0 THEH AJO 

A(X1p];?3=5 

NEXT X 

REN Mt SEA HDNSTER? **4 

FOR X^l Tfl 4 

XaE[flT(RilDM]»r|S»43 

X2^Tt«T(R||Dn]*ia?*2 

IF *"]f3:2K>0 THEM ?00 

ACXI^X2hi« 

RESTORE 40?0 

fBR T-1 TO itiT(i%«igrn4B)M 

REAB AI^N2 

IffJT r 

NEXT X 

REN *«* 

FOR 1=] 

Bcn^o 

NEICI 1 

j:=jo 

^■4000 
F»2500 
TOO 

n'3 



prf}^r«^ ll^ "Underh^ater Pld LDb*< 



TB UEfl ";Hir 



9fT 
TO ■ 



STAETIMA VALUES *** 



-IdIA 



Sm Ml CO 

096 Kin •■<» CDHnflJID JECirOW »•• 

III ?Hm ''"''^' "^"^ """"' "^ ™'^'' ""^^"^ "f'^'^ 

»« PiflNr - llf: SflNflr 

540 PfilttT " 13: PQl«rs fliSgiLE COhtSJIl," 

»'fl ?F(INT " M: flUNJEVEflNfl" 

980 flTlUr - US! 3Tflriig/ilW1fllj£ ffEPDRJ- 

9Ta PJTIKT " lAi HEllfiOUflffTESS- 

IPttO PFtilfl ■ 17: SdBQTflEE" 

lOlfl PSmT " |j[ pQUER CONVEPSlOh" 

TOO PPfNT - 1^: 3UP*E(fIiEJr- 

'aSO GDID BSD 

Ifl^O RfH ». HO J llflUlllflTillN |« 

lo^D If mi) >■? u THFH Tsae 

ISiil PFTCNI "ESeidEg flUE UNDER P£Pfl[t --HI;' ■ 
HJ7ii flOTB fffiH ' ' 

IllflO IF CVS THEH IfiD 

Tfl?0 PfINT -UBT EhOUBH EfftU TQ HAfl THE EHQTNES -M" ■ 

Tiflll BOrO 9B0 ' ■ ■ 

nifl [HiV{(.23*miHT)/lll).1-|B (I 5iij]j 

1130 PSIST -POUfS flVfllL*BLE"";P;-. fDtlEF TO USE- 

fT30 IF Pl^C Ul fr>P THEH J I lit 

IIAO IF Pt <' liti) THFr* 1211} 

fl?0 If PltDll><.4J YHErJ I2lfl 

lleO PfihT "fllffflli; P:L£ odes EUftPCPniCAL V«;'<M HEftLOUASTERS- 

13)0 1>S| 

1 ??* r^Ej 
^^3l^ in=i 

1?40 fBF( IS'I TO lim[|irjPi.igo,^5j.nH 5> 
U^O IF |*1I>0 «!,£ 1,(1^2, flpB ,„,^5 J 

l^iO Pfflf^T -rau CW't LEAWi THE KS^H - = »»:"M" 
I3'0 GDTS TJ<0 

I JOB l=1*tl 

IJIO PiP'lOC 
I3?fl ODTO 1320 

I3J0 pinnT 'Tou «nosf nm AQRotirjii -■rtii-n" 
iJ5i> acsj.szj-'O 

13S0 SmC T£90 

f3?l> ZF D>10 IHEH ]I9fl 

HJO PSINI -rau MMHEH 4 SiriPiif TUl'flE BOTH SUW "jlltf-M- 
Ii20 IF fi»0 THE" fl?60 

l'*0 IF D^SC THE* I2¥CI 

U50 fPIUT -m FAnMED lOtB HEflDflUAFJIESB i ! fDU'RE SJWi '" 
H4C GDTO 4IBD 

r«?6 FOIHT -VOU'i/E BfEN filUUlf UP fl A HTIfF -I.1--M- 
T»8i} BDTQ 61BC 

H'O IF KUBCDl.n rHEU Ii30 

PSIN' -SUiJ UEKf EHIIi- Br fl SEft «DIfBI=H, -.Mr"' 



1310 eoiir di 

15?fi (En ■■• CH£CK FOff HEflRBT S£* (tDNSTERS Wt 

1130 FOR Unl-t ID l--? 

ia<0 FDR TJ-I-Z TD 14? 

THO JF IKl OR y3>3a QP yjd OR 13*311 7H£H 14JC 

llfiO ZF im.DOi THEH I6ID 

1^70 TF l*l|KIK.2a THCH 1505 

IMQ IF Ql-O THEN 1410 

1390 PJflJfT -IBL jyST SAD A IfflRRW ESCAPE IHTH A SEfl nONSTER -!«*!"]]■ 
TftOO OI = l> ' ' 

1610 NE(T TJ 

1420 flCKt JJ 

1430 HEKT H2 

Iii40 PRIIfT 'JiavlGflllllh COiPLFTE- FOUHf LFF>-;p;- ■ 

l»0 If P)0 TIIEf^ I3<D 

liiO PHUT -flTDfllC PILE HAS QOtfE BEABFm sUB giNFH, CREU SlfFFQCATES" 

U7i| QOTD fiieu 

itSB reh -ti III soNAfr >■> 

1*90 TF II1?J >= THEH liflD 

I?01J PRIUI -SDlWf 18 UlfDER SVniR -:*»:'.■ 

1710 eilTD Bai> 

1J2C IF OS THEH 1 7Sl> 

1730 PftlJfT -HOT EKOUen CREU TO UORX aOWllR ■:«:-,■ 

17*0 QOlO 8BC 

T«il PtlHf -CPIIBN ■■; 

VtD liTPlIT 

1770 ON iHTimi) BOTQ l?»a,20ICl 

1790 6QTQ 175D 



IISTftUCES- 



I7t0 fftH I— PBINT OI]l nw ■** 

1Hi>0 FRiJir 

IBID FOR X-1 ID 20 
1820 FCif T'l TO 20 

laiO DflTil - ","'—-,■■(()", "\B/-."IHI-,- 1 -.--(I-" 

,fl«D TB^O If lLf^,VKJO THFlf I B90 

T«D IF JO! liNII I02l> AND TO] flWH l-liJi} THEN IBBO 

ISfiO PPIPJT " . "i 

IJ70 GDTO 1910 

IBOO BESTOHE IBJO 

IflflO FOR (1=1 JQ fi[j,r^4i 

nOD RE4II ai 

1?F1J UEKP (1 

l*i8 IF HNIfllK.li flKB •(A,VJ?2 THEl ISftiJ 
19*0 PlUJlT Hi; 

19^1] IfEiCl T 

]?4U PRIf^r 

1*70 tfEUT K 

I9fl0 P^P-50 

T'^D [f F.'O THEN BflO 

2000 JJOTQ Td60 

?0T0 tEJl -■" DlRftTIBWAL JNFQBHATIBN t^, 

?!>?( FBF T=r TQ i 

^77 £lll>0 

:?«' BUT I 

SOJB PR[r(T -IHPECIIOn II OF SHIPS 

2Htt HESTQRE 45 ?0 

21150 FQP (?r TQ B 

2Di0 REfiJI iTjlT 

'JO'O 13-0 

20QO FOB jn=i rn za 

2J^0 IF Sl'll.ii^U OR SHU.J4?20 0H a24.|.X<(| (ff a2»rTH<>20 THEN 

2100 If AfSI»Mtl1,g2fTT«lJ03 Tutu 2130 

lillO Ii=l,i'l 

2130 tlXiy=tH 

?iJO IfEKT JA 

21*0 IF (3=0 THEN 23^Ht 

J 150 FimfT - "fX^U, 

31flD FDR (4=1 rO il 

2170 PRIBT Bli;4>: 

2fB0 HEKT X^ 

2190 FRIfll 

2200 NEXT X 

22ia GOTO IVQO 

2720 na "' is? TQBPEBD CONTffOI. <•■ 

2730 IF B(3] J- TH£N 7240 

32^0 PlflHT -JORPEBO TUB65 ARE IfNttR REPflIB -IW;-," 

27^0 QflTO B80 r j - 

22fill IF C >= 10 THEJf 27fB 

2370 PRIBJ -«QT ErfDU&H CSftI TD FIRE TORPEOD 'hf ■ 

2?Bo aoTO aoo » ' ■ 

3290 If T TlfEU ?j30 

1300 PRINT "HD TflJTPEIlOE LEFT --Ht-" " 

2310 EDTQ 300 

2S20 IF B;2efl0 THEN Hit 

2330 If fiHlHl»,g THit, ?Jifi 

2340 PRINT "PPEOaURE IHPLOBES SUB QPON FIRTNt, . -TQU'RE CRJJSHEiri '■ 
7330 &DTD ma 

2ZHt ADSDB OOBO 

3370 l=Sf 

23B0 T=S2 

2J9U FOR (2=1 TO IHT<7':rt{-(S;5D>J-fl|lB(1)Mi.!) 

2400 TF I4(1>0 AMB (.KICi 4111 HTISO ANB THK21 THEN 7^0 

24'0 PRINI -rOPPEBQ OUT OF BflJffll! RANGE, ,., KfEFFECTUW. Vm;-." 

2130 p-p-fao 

?M0 IF P>0 THEN 44 7C 

2450 SO TO 1*60 

3I7O 1= ;'^"^^'^'^■^ aO" ?^^Df25IO,2&30,2a»0,25flOj2i10.2«M 

JiBO i=r-'f] 

2490 fRiNT ".,F..*J 
230O ODTO liSO 

25tO PRllfT -TBL ToOli BDT SQItt i^AHD -iJHJ-i- 

2120 fl11'I1,r*Tl)=B 

2530 GOTO 2*20 

2540 PRINT -OIICFflll TflU EOT DUE ■■;ifl|-1 f- 

itiV IF a(SO THE* 7321 

2570 GOTO 4740 

2580 P*|JIT -IBU BLEU UP TDUJT *MflCrtRTCirS "JM;- 

?590 S3"0f 34=0: D2'V 

2400 BDTD 25?fl 

2110 PRlffT -BLAflii SHOT UMTEO Ofl fl hlNE "rJI»;"l |- 
3420 GOTO 2520 

2430 PRllfT -A SEA JlONSlER MAB 4 TORPEDO FQft lOHCH -rM:"!!- 

2440 90TD 2<7Cl ' t '■ 

7430 NEd ii 

2iiO PRim -BUO,- 

2470 GOTO 2420 

24B0 REM <>. ||3j PDLflRI3 ItTMIIJ CQHBBL —I 
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If T^iA) >= i THEM 2?2i\ 


341 D 


PflMt ^niSSlLE 9ILQ& AJ^E UHDEft REFAIA ";»;'.'' 


34J0 


GUTQ SBO 


dtJO 


If 02a THEH 2?10 


3^40 


PfiEHT "NOT EMDUBH CREU TD LAi^HCM A HISGILE ';M1;''.* 


3ASCI 


GOTO SSft 


3440 


IF ftOS THEW !?90 


34 ?0 


PIII«T 'Hfl HIS5ILES LEFT "^H*;'." 


3AR0 


flDTO «e^ 


3fi?0 


IF D>50 AMi B^SO^D THfN ?SSQ 


J7i>d 


PlflNT -flECOIAEItB ThIAT TDU BQ NOT FIRE AT FMIB DEFThl.. .PRQCEEr; 


j?ia 


INPUT At 


S?2Q 


TF LEFriCAiO> = ^il^ THEN BSl? 


I? 3d 


IF IflfSn^^.J ][IE«1 2950 


Ad^4Q 


PPlNT "NL^SCLE CXPUlSES JJPOH FIBIMG *;NI;"ki "fOU-^J^E HEAAM" 


3750 


BflTQ Aiao 


37^0 


IjOSU& 4eQl> 


i;7o 


PRINT "FbEl CLBS,]"; 


3730 


THPUT fl 


37^0 


IF F1>D AHU F1 <.■* F THEfl 2^-\^ 


iaci^ 


^SrNT "TDU f^A^J£"rFt''l-»S. LEFT ^Jtt*;V^ 


3Sie 


SO TO 2B40 


3Si« 


F: = ]J(Tff1/?S4,3i 


3^30 


IF SH:t1+F2>0 AHD S1+:^l*FJ(5l ftNft S2-^i1*F?>D AND S2*Vl*F2C21 JH£H 29011 


3B40 


PKlHT °HI5^ILE JIUT QF SDNAN TflACKI^G ''ittt;'- HISSILE LDST^" 


3^^Ci 


B-n-1 


iH^ 


F-f-Fl 


3170 


P = P-JOlJ 


3800 


GflTD 2440 


31 ?0 


BJ=e: [H^iJ: Ii5=fl: B4 = 


3fl}0 


FCR x=5]-Hl*F^-| 10 51tX1*n*1 


3f10 


Ffls T-iatriffz-i to S3+"n*F2*i 


39Jfl 


IF Kl Cft X>2D Dfl K1 OR TJ20 THEN Jt^^J 


3?30 


BJ-JlJ-[ACKTT]=3f 


3 HO 


B4-Il4-{A(X^'r]«^> 


3?50 


B5^I15-[Aa^T]^5f 


3^40 


P^=D*-[fl(Ntli-5^ 


3t;^o 


EF A():jK>4 THEN 3100 


3VS0 


PfilBT -^lOU'-Jf DtSrffDTED TOlB HEftBaiJARriRS ";N1;"!M- 


3TT0 


BJ=<]: S4=0: Ii2=U 


4DD0 


GQID mo 


4DTfl 


If a{j:j)<>2 then smo 


4D20 


PSIHT "TOU JUST BEBTftflrEIl TGtiftaELF ";N1;"!" IHJHh]!r 


^ffiO 


GOTO £180 


ilD40 


fta^r3=o 


4D50 


REiCT T 


^■14 1> 


NEXT I 


4470 


IT D&<i> THEN 3IB0 


JIDBO 


PfllMT "you BLEU UUT SflilE ISLAMf ';N1;''.'' 


4490 


IF D5=J THEN 32D0 


410D 


Pfr]«T *TDU DESTffOVE[i-iMri»IIIE9 'fNii^," 


411 1> 


[P I4'=0 THEM 322C 


412D 


FftlflT *TJ3U GOT";Ii4;"SE4^ HaflSTERS ";^t;"iM ADOB UffitK!^" 


41)11 


FfllrtT 'TQU II£3TR(irEir"jCJ;"ENEnT SKIFS '^Jrtti^'ll'^ 


4I4D 


S^S-BJ 


415i> 


&0T0 ??^o 


4I4D 


KEH «* J]fiNU£UC?IMS *« 


41^1? 


[F tii) >> t THEV J2f0 


4IBD 


fltlHT 'BALLAST COhTROlS AFE BEIrfO REPAICED ';!»;*.■ 


41915 


flOTO »ai3 


4200 


IP C>12 IHEM 332C 


-4310 


PftlHT -THERE AtE MT ENOUfiH CRFO TO tJ(Hrk( THE tOrfTRQlS '?«»;*. '^ 


4Z20 


flDTO SHU 


-4?J0 


PRINT *KU SEPTH^^ 


42^0 


IHFOT B1 


i4?^0 


LP Bl ^1 AflD BlOODO IHEff »?0 


4?A0 


PRIrtT -HULL CRUSHED BY PRESBUJ^E ■;il*;"!^■ 


4?7D 


tmO 41^0 


4U0 


P^F-IMT{A?S4{D-B3 ?/2^,5)l 


42?0 


PRINT -ftAHUEUER COHPLETE. PEHIER L0«S=";INTCA»9f (D-Dt >/34.S) ) 


41D(I 


tt'Di 


4310 


onto u?o 


432{l 


REtt *** IS: STATUS / BAKAflf JtEfURT •*« 


4330 


IF B(4J >- D THEK 3^35 


4340 


PRINT "HO REPORTS ARE ABLE TQ OET THRDEfGH *^Bi;'.- 


4350 


6010 BSD 


43^1] 


IF i:>3 THEN Z^M 


43^0 


PRINT "BD QlfE LEFT Tfl Qlli£ THE REPORT ";tt*;".- 


4390 


GQTQ BAD 


4390 


PRINT "B OF EtfEflT SNIP? LEFT **;S 


44*0 




4410 




4421} 




443 D 




441D 




413D 


nwi 


44^0 


PRINT -UAPtr UHAIE REPORT-; 


44^0 


IWPUT A4 


44^0 


IF LEFH^fl*pl]:^"N- THEN 3470 


4^fO 


PRINT - IT£I1 DAHABE (4 QODJIh U NUClEtALf - BAT»K 


4^[)Q 


PJflKT * ■ 


4S10 


I^A r A " E l#B T NE S " , *S QVAR % " Tfl RFEUD^" ^ " H ISS I LES'' , ^HAFfUEUEff IHQ^ 


4^0 



BAT A "STA Tl S ' t "HEA ftOUftfi T£ RS " p " SA B DTAG E " , ■ C DtfVE RTEH " 

RE^TDIlE ]£00 

FftR S't TD 9 

fiEA[l AT 

PRlJfl AfiLHI> 

NEXT X 

PRINT 'TOU ARE AT LOCflTIttN C";S1 ;"p";32;"?*- 

FRIHT 

SDTD ABO 

HEtt *t4 i^: HEABQUAHTER^ ^^* 

IF BC7] >^0 THIN i?i^ 

PRINT "HEABOUAPTEfiS 13 DArtflEED. UNABLE lO HELP *^!N^i^»' 

EOTQ SflO 

If B2<>i> THEN 37?IJ 

PRINT "HEAIiflUARTERS 15 BES£GTE[h ";Ht;"^" 

l>aiQ BSD 

[F 5flR1^31-S3]^2t(S:-5iJ*25 <= 2 AND D<5] tStfN 3flflCf 

PRINT -UNABLE TO EOBPLI" UTTH MCKING DRBER3 ■^;lf*;--- 

IjOTQ 980 

PAINT "DIiJERS FflOH HIADQIJANTER3 BRIN4 OUT SUPrLlE^ AHB KEN, 

P-40l>0 

T-e 

Fi 1^150 
C=25 

OQTD 46911 

fiEtl *l* »;r SABOTAGE 4*:t 

IF BCB?>=0 THEJI 3?20 

PRINT -HATlTHES I HAG CESS I BLE ";r+l;". H^ SABOTAGES POSSIBLE. 

HOTD H30 

IF 010 THEN 3?50 

PRINT "ttDT EffOlfCH CREU TO GO Gil A HIGSIOH ";N(;"/' 

fiGTD S30 

&3 = 0: IH=1] 

FDR l=S1-2 TO S!43 

Fen J'^l'Z TO 52t2 

IF X<1 OR X>20 OR Til GR T>Zfl THEN 4J1D 

n4 = B4-UCJ:pVJ=iS 

JfEKT T 

HE XT £ 

IF 03-^:4 THEN «*i? 

P?[NT -NO SHIP^ LN RANi^E "iHi;"," 

DOTG BS4 

pfiiNT -mEiE ARE";]|3j"$flTP0 1^ RAN6E '';N4;-.^ 

PRINT "NOO ftAtf*^ ftEH ARE 6DINB ^;N>; 

INPUT 01 

rf C-m >p ID THEN 4120 

PRINT "TGU ttUST LEAUE AT LEAST 10 *IE*f ON ffOAftO VMt'*" 

liOrO 4D70 

B5 = INTiB3/flH.5] 

B4'a 

FOR K=Sl-2 TQ SI +2 

FOR T-32-J TO 52*7 

IF DJ/JH>1-flNDn? ANB FlKir M > * [13/0 K . T THEH 4220 

[F AiljK>3 THEN 4220 

B4£ll&«T 

AiX^f3-0 

3i3-1 

LP S>=0 THE(f 4240 

NEJT y 

«IT X 

PFtlHT 04;**9HIP5 Mint JlEaTGOifB "jH*r." 

JJi=0: w^iy 

PDR X=l TO 01 

[l7-P?-tflHflC1k>.t) 

KEJIE A 

FSR )l*1 TO 01-07 

NEXT X 

IF B4^0 THE^ 4340 

PRINT "A SEA H0N3TER SHELLS TH£ FtEN GH THE Utft BACKIih" 

PRINT ii7!"nEfl HERE EAlEfl ";ni;"M" 

C-i:-D7 

PRINT 114;"Hrfl UEftE LOST THROUflH ACCIDENTS -;«;■■-' 

C'C-Dft 

p*p-iKT[io*Qi«itN[ren4TOi 

flQTB 4490 

(Efl *** RS: PMIER CJlNVEATEfi ««* 

[F IIC9J >- 1^ TNEK 4440 

FRLHT "FOWER CDwUEFcTEff IS )l«W&£lJ ";«*;-." 

SOTO BS4 

LP C>5 TKEit 4*70 

PSI*IT -NOI EROUtH flEfl TO Jl}AH THE CQNiJERTEfi ";«1;".- 

GOTO SBO 

PRlffT -OPTIOM []"FUEl TG PQI^ER, 2=PDIIER TO FUELr'^ 

INPJT D 

OH G fiQTQ 451G,45S0 

frGTG 44 ?0 

HEfl *»» fUEL TO POUER CONfER^IDN *:** 

PRINT *fUEL AyA[LABU--!Fj-. CUNiJEtT-; 
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REAL BfiHASE SliaTfllflED -fNl;"." 



";H»- 



IF Cl>r QlT CKO rH£rt 45£0 

#Ett *?* PfilJ€R Tfl FUEL COHVSRSION *** 

PRINT TOHEJi flyrtILABLE='^;p-1r* tQHiJERr"; 

IHPUI CI 

IF C1>P-1 OF CKfl TiEtt t59D 

F=F-C1 

PRIHT 'CUH^Jefr^II3W COnn_ETE. POU£R=-;f J~, fuej.=**;f:"." 

GOTO I^^O 

R£n *** It9f SUfH^EffDER *ft 

PBItit -COLJARD!" TOU-'RE «07 "JEFrT FAPpJEfTlC "[BJ^iM- 

R£H *** RETflirflTlDN 5EC7IB*! *** 
l>Pl} 

rOR l=Sl-* TO S1H 

fOJr T=S2-4 Tfl IS^+^ 

IF XO Off X>2(f DP T<1 DP "^^ZJ THEN 4^dD 

IF ACXpYK>3 THEM 47^0 

a=flt-CJrHB[n/SaRMS1-Sr2*l52-lr2?j 

NEIT Y 

NtiT s: 

If fl THElf 401I> 

PfiiNT "HO aJ^I?S IM E4i^N6f TO DCFTH CttARfit (00 "!il*l"1f- 

0D7D 521CI 

PffiNT "DEPIi CHftPQES OFF *; 

IF RHBnJ>,l THCtf ^650 

fRiHl "POJri SHE ";fl*;«M[" 

QOID 4640 

fRIHT "SrARBOflBD SIBE ^^JN*;""!" 

IF a>.a] cff SNBnf>.92 theh 4S9d 

PRJUT -*fll 

eoiu 5Z]i) 

IF 0>.3i DR JtHDtin^ta THEB 4T^0 

FlTltfr "LIOHTp SUPERFICIAL 0A1ABE 

F = F-5Ci 

ffCiNTCPNIin?*?5-H5=-PNlFn)^J 

I^OTO 52t0 

IF 0^,4 Off R«Iin)>.?7S TWeN ^0?0 

PAIJIT ''rtODtHATE I^AHilGII. REfflJffS NeEDEO." 

P=P-7S*I|f|CR«t{l>*3lf) 
POR 7=1 TO 2 

;c^INT(«NIin5+V]+l 

IfEiT T 

eOTD 5^10 

If 0>,9 DP R«IiC1}>,»BJ THEH ^IflO 

FRIHT -HEAL-T DftHflOEM RFPAIff^ IflilEDIAIE "?«:"IM' 

piF-[Z0C+IJfT4RRBCn*74n 
FOR K=1 TQ ^+liirCflNl}{S^*3J 
r=i!JT(irNDns*?]+T 

HEKT X 

60T0 iJtO 

PRilfl -HHASe CRJTICrtL^Fii UC MEEI HELPm* 

fi*=: - UfiflVUKXCflyPCRHFlRfifllflUff LOTKM I TftCyrZYl TLCSESTT«lWIPCfl£BaQ 

PPHT "SOI HfLP^ ^N COBE* HERE IS THE CCBEfirtlDt [ftf-l.^h; 
fftn TIRE lELAY mtfO THEII EAASE THE COlC 
fflR r^l TD 3C0i NEXT I 

J*RINT CN[l*Ct3^!TftlC3O];-X^r;CJjMt]3]:TftB(J0^:"M*^■^ 

INPUT "EUTEJl CDIE-JB* 

PRINT 

IF HOJj[IH<fl*^X,4} THEN 31T0 

FSllfT -fftSl IttlPK V«t;-|f WEIP ARRIUES IN TEriE TQ SAiJE ^DVHI' 
OOTd 5040 

FfilHT "HESS^et OAPBLEI -rN$;\,.Na HELP jU^BIUEallf- 

BdTD £181] 

REfl #** HAVE SHIPS / SEfl rtDHBTESS *■** 
IF BCn >r OR [^(33 >= 4 OR 1^(4) >= D OF DOl >* 
IF BIB] >- DR [K?f >= T«Ett 536fl 
PRINT -OfinflBE TOO HUCH ":«;^( M TflO RE SUflKi 
GOTO 6iao 

R£n *** J^aUF SHIP& / SEA (lON^RS **« 

PfiJilTl PRIrtT: PRIM ■ — «* RESULT OF LAST EKhX HfiNlJfVEA «*— ^ 
FOR X^l TO ?fl 
FOR T=1 TO 20 
IF fifl,t]03 THEN 54*( 
*** HOVE A SHIP **pfi 



HPCHQTaiO" 



Oft 




TNEN 324Q 



AEA 

o=ne 

V=II? 

IF XtCI>0 AMU >:+H-;;] AHD 

FOR KO-IT TO 1 STEP -1 

[f fl{):-U*X0pY-lhtI0?O0 TttEH SIflO 

A^K-Ut:cO^-r-1*KO}=3 

BOTD ^040 
ME^T 1<^ 
3 TUP 



■r-H^>0 AhS T + y<21 THEIt H20 



S420 

5430 
5140 

a4?o 

9400 

54?0 

a 500 

5S10 

5at 

5S50 
53^0 
51-^0 

gSRO 

5410 

5430 

S4?0 

a?oo 

S710 

S?30 
3740 
5750 

57A0 
S77fl 

17^0 
3 BOO 
SfflO 
!1020 
5030 
Sfl40 
3150 
aB40 
5fl7l| 
9BBI^ 
SBfl3 
f|?Ol] 
TSTIO 

tnt 

5«0 
5¥40 
5»30 
3f60 
3^70 
S9ffO 
5f?0 
£000 
dOlO 

A030 

£040 

£P50 

6040 

iflJO 

60SO 

^l?0 

4I0O 

fittfl 

d120 

£130 

A140 

£S50 

4140 

iit70 

dlOO 

4190 

4200 

£J10 

42^0 

6230 

42411 

£250 

42frO 

£270 

i2i6 

£2^0 

£300 

£310 

ii20 

Ot 



BY fl SHIP "JM;"UM 



ON fliy-ttfpT-hVJtl GOTO 54i0 ♦54£0 J 3330* 3 440 p 5340, 3400,1410 

inXprj'O 

Goto 4000 

REN **f tHANe£ IIREEIIOH **+ 

RESTORE 40^0 

fOft X0 = 1 T-fl |PfTcBHDMM85+1 

ffEAB U.IJ 

flEXT 10 

IF ;i4U!1 HR :f4U>20 DR "T+U^i OR YtU>20 THEN 5470 

OUTO 5420 

TF n>50 THEN 54£0 

PftlJjT ■*« rOU-'UE BEEV flfln^ED 

OOTH 4tao 

IF l!N0[IK^t3 THEH 34^1} 

FmUT ■■**> -fflllR HEADQIJM'ERS UAG HANHEO "jMj"!!!" 

33=0; 54io: Ii2"0; Aat-UpTtyr-o 

BOTQ 3£20 

IF ffffD(IK.7 THEil 94^0 

PRINT "f*t 5HIF DESTRO-VED BY A niMt ":FH;"!M- 

5" 3-1 

IF S<>0 TH£H 5440 

ODTD £2ti0 

IF RilD(1><.fi THEH 3440 

PRINT '"* SHIP EllTFN BT ft SEA flQHBTER ^!H;"H" 

s=s-s 

GOTO S&30 

A EH «f* NDi/E A 3EA ilDN^TER «» 

IF ilCXpYK>4 THEN 4OO0 

[f X*HK1 QR I4H1?20 OR Uft^^l OB y*H2>2fl TH£#f 3740 

Ofl flC);t-fl1p'r*H254t BQTO 5^30 j3?A0,393Op5B5O^J?O0p3730- 5^30 

Aa-^fil^T4M2^i£ 

fla.rj^o 

00 TQ 4000 

REN 4*4 CJ^A^BE BinECTItt M* 

RESTORE 40^0 

rOfl ):0=1 Tfl JNT(fHDf1?»8?*l 

EEAB HI^H: 

VEX I KO 

IF X-*HK1 OR J(*H1>20 OR TtflSJI OR r4H2>20 TffEH 37*0 

SOTO 5720 

PRIHT "*tM TQU^VE AEEH EATtJf BY A SEA MONSTER ":Wr»*ir 

GOTO 4100 

LF EHB4E]>.2 THEM 5740 

PRINI "*•*: SrtIP EATEN 

IF SOO THEM 5730 

00 TQ £2£0 

PRIflT -«* A SEA HOHSIER 

S3=0: a4=0r 02iO 

SOTO 17 JO 

[f RHIlMK.75 THEN 5740 

PBIHT "*** A SEA HONSTER 

IF RHOflK.B THEH 3fB0 

PRINT "ANO OWE BIESiT 

00 TO 0730 

PRIHT *ir'B A T«l!" 

50X0 5740 

NCJr T 

NEXT y 

REM *^^ HAKE REPflKffB **# 

FQR !■] TO ? 

l!^]HT(RHBU}+rH1 

II(X)a[rcXh4CRMBnSl(atfflHHl}*2H*C1tf-CB<5l> 

NEXT T 

BO TO flsa 

REi4 1*4 BBSUB FOB COURSE / DE RECTI DM **+ 

BATA -ItOt-UJ tO, 1,1,1 pi, O,l,-t,0,Mp-lr) 

PRINT ^'COORSE {1-B]'*i 

IttPOT CI 

IF Cl^l OR Uy>a THE* A10O 

RCSTBRE £090 

FOR K9=l TO ItfTCCI+,3? 

|tE4II XMI 

HE£T XV 

RETIIRH 

REN -M BESTRnrtD 1 *** 

PRINT -THERE ARE STlLL^^Sj-ErtEHI SHIPS LEFT ";Hf:"-^' 

PRINT -YOU tlILL £E OErtOTEII TO RAtiK OF DECK SCRUflCfilFl^ 

P^IMT -NANT flNQTHER BAHE"; 

IHPOT Af 

IF LEFT*ifl»^l><>-T^ IMFN £25fl 

SOTO ilO 

STOP 

PRIM -flOOB IWM "jHlf^M Y5U EOT THEN ALllPi^ 

PfltttT ■PRQJlDTiOJf ANH CBNflEffDATIBNS UJLL SE BIUE* IdBEDlATELTi "" 

OOTO ^210 

REn *** ISLAND DAlA 4** 

BATA 0,l,TpTpOfOTO,l,l,Tp1pOTlpl.l,D*rpl,l,1pO,O.CJ 
BATA t,tpOpOp1,J,0,l,l,0,tpO,0, 0,^9,0,0 

ENO 



IT J4 SEA J1DHSTER "fHII'^H' 



f^TE TGUR HEi^OOUANTEH ";|(f;"M" 



FI6HI "JN*;^^I1I 



OK -<D>20Cl0)^|*(-{DIX]O7l 



r 
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Seawar 



Voj are the comnander of a Heel of 

ships operating In enemy lerrltory. 

Vour task force consists of 9 ships, and 

Ihe enemy has 9 ships. Whoever sinks 

alloflhaopponent'sshipstirstmnsthe 
campaign. 

Voj, as the commander, must 
provide the angle of elevation at which 
the guns wfll be fired, neglecting air 
resistance. Your inarrumenls wiil read 
the range to the Target, and Ihe initial 
vefooity is held constant at about 675 
meters per seoond. 

SEAWAR will help you learn about 
the paths of projectiles and what 
happens as the angJe of elevation 
varies, 

1. First, what do you think the path of 
the projectile looks Jike. Make a 
sketch (If you're still not sure, do 
some research in the library— it will 
help you win the battle, corn- 
manderf) 

0- Whal angle ot elevation do you 
Ihrnk will give the maximum 
range? 

b. What will happen if you fire the 
guns at 0°7 

c. What will happen tothepnDjectiJe 
if you tire H straight up? 

2. After becoming proficient at winning 
the battJe, change the initial velocity 
ot the projectile. How does this 
alfecr the range? 

The original SEAWAR had a timing 
function th%i allowed only about 7 
seconds to make your ne^t move. It 
your computer has a timer, this would 
be a neat addlrion. 

The origin of SEAWAR is unknown. Jt 
was revised and submitted to us by 
David S, Pa^ton. ft was further revised 
and the writeup prepared by Mary T. 
Dobbs, Mathematics and Science 
Center. Gien Allen, Virginia, It first 
appeared in Cfeafiv& Computing. 
May/Jun 1975 
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SfilUdR 
nDHriSIflUM, HCU JERSEY 



TDlf CDHrtilH fl rLEET OF 3IILP3 OfDUIJAt » 

Etnr iEtBTiOjrri'1 

DO TOJ irtlS, fitr AS^ISTAttCE'' fES 

lOU TELL TDUP B^R CflEltS THE ElEg*ri» TO 3FT THETB euHA. 

ELCVfirTOf 15 Ih^ DEGRffS fWtt W 360. 

VDUir TASK fattL CBriBI^TS DF 5 DESTRDTEGfi, 1 ahlSfRS, 

2 »rTI.FSII|r9» Ml 2 HEilVr AIlCITfirT CAHfflEirS. 

TIF rHEUT IMS » SHIfS fOf HT5 DEFENCE. 

JF fDU EIKCCEI IJI SIWIIIfG t,ll Hl5 3l\lfS BFFDRE >1E 9|IWe 

YiGirs, Tou wvE uii, ii(HiEveri< if he sfiis ail rouB snip; 

'BFFOBC TOJ MIFE HFFHTEI HIB, TOU lli*VE IDSIU 
IE! U? fE&lllMI 

tOWf FLAISHIP MS BETECT£1 A U-tflAT 4JVR0ACHTPI& AT ? piUlfT»IS. 

rmil BlIIIHIilE lETCClJQII EBUlfflEffI JTEAIS THE FaUGE TjI THE TflRGn 
M 3»4tl METF*!^, 

IHE U-lfl4I HAS CDnAEhCED FlfTFIIC TiJVPEIKlE? AT IflUR iHlFS- 

hi; rilSI njRPEDB EUPlDDfl JBl HETEIS EEd]H| ItJVH Wlf . 
UlfiT ELFVATIQM .. f 3a 



F HE ill 

DCPTH CHUrGE EtPLDDEI i637 flfTEIS flfl OF Ttf&El, 
TttE EHIhl II-ID*T SANH DUE OF TOUlf KBTIDTEBS'I 
WUI ELEMTIOII T> T ^,4 



-FIKI I : 



lEPlK CHAHni ElPLlJiED JW2 lElERS AFT CF TAffflET. 
TIE ElEPr ll-BWT sum IQl* H&Wl CBUISEB' | 
UIAI ELEUAIIDH •■ t 2V,f 



FTIElil 

KPTH CHARGE E;(PLIIBFI 7fl7 
THE ElEPt rOflPEDU :IPLQD£fi 
FJIOIT DF fOUV SHTP. 
U4IAT EE.EiJfiTlDI' » T 2f.3 



«TER5 *FT 9f TftRKT. 
JOS lElERS ijr 



FiPtMr 

BEPTH CMASQE EiCFLOHfD |23 HETEIS IFT OF IHfiOEl, 

Tit EIEMT il-lfm' liflHH MQIHER OF TDUf ICSTBOVEPSI ■ 
HIAT EJ.ELri;ill3ll i> < 39.97 



F»E1M 

KPJH CHACGE EifLDlED RIOrtT M IBP OF THAT BAITIH 

TAft&tl DE^TIOIFIMI .< J .• VtUtfiS £aPEIHD. 

rny v^w losT 3 wips. tii the EiEflf has lost i 
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Totift fuesHiP JiEPO^rs the sichtriris dp i=ia Et^^nr 210 m shqre mn 

TQUIt INSTirUHEUrs R£AIt THE RriU^GE TD THE TilllJjCT AS 41020 METERS. 
1N£ CJfEftT 2lD API SifDRE OUM I£ FEATHIi ON TOUR SHIPSI 
NIS fIR9t ItOUHB fELL IH HOERS SHORT, 
UHAT ELEV^riilN » ? 32 



FIREMI 

3H£J.L D^iERSHI^T TARflET BT 773 HETEfTS. 

THE EWEMi 21D HH SHOR£ GUN ^ANK (IME QF TUUft HTTLI3HIP3M 

UHftT ELEVftTlflN « ' 31.2? 



FiE£m 

StELL OiJfPSHCT TARQEF BT 240 HETEES. 

^Hi ENEilT ?I4 Fifl SHORE GUN SAMK YOUR LAST I^E^TJlGTEA 1 1 
UHAT EJ.EIIATIJ1N » T 1^A/^C7 



riKiu 

TARQET DESTROTEBir^ -^f 3 

TOU HAVE LOST S 5HIFS, AMD 



** ROUrtAS EKPEHSEIt, 
7IIE EHENY HAS LOST 2 



tOUR FlACSirCP P£PDRI5 THE SfGHTTNC f\¥ ftN EHEflT 7&,500 TflH CftUlSEfi 

YOUR [#STRkJffEHT5 E£IlB THE S/.H&F T^ ThF Ti^RGET AS 410C? HETEPS , 
TRE ENEMY 70,l>fiO TO^ CflUlSEfi IS FIRIBQ 0*1 tmR SHIPS! 
3K fACTp HE JJST SjlttK YDUR AIRCRAFT GARIiHRH 
URAT ELEi^ATI(]l« ^t T -12 



FIKIM 

SMELL OI/ERBHBT TAR6ET BT 7S4 HETERS. 

1H EttEHT 70pi]00 TON »UISEA SANK TOUR LIOJ^T CRLIISERi! 

UUAT ELEliATIQM «» T 3K1 



FIRE I M 

SHELL OVEfta^QT TARGET H 123 PlETER^, 
THE E«EttY ?apflOfl rOM CRyEflEft ^AUK TBUH 
HUAT ELEVATIOM ** ^ 34,9 



LAST j^IACRAFT fAARlEHn 



FEftELii 

:** BOOH :** 

TARSET BESTRU^EIli 
YDU HAi^E LOST Q 



I ** J 

SHEPS^ AMEl 



«* ROUMEiS EifPENBEB, 
THE ENEHT HAS LOST 3 



YDIJft riAOSHEP REFBRTS THE STSHTIWS CF AH EttErtT BATTLESHIP 
YBUH IHSTfiuMENlS REAB THE fiAHQE TO THE TflRSET ftS 42fli4 METERS, 
TRE EHEHr BATTLESHIP ]fi rifijlfl) UN rOUH SHIPSi 
[' FAGTp HE JUST SAHK rOUR LAST BAITLESHIJ^n 
4 ^t ^4^*4 PEACE t*t»t^*4» 



TJIO FIREB M 

HOtJHBS , 
m OF TOUR SHIPS HAVE 

TH£ BATTLE [S QUEf*-*.. 
GK 



RGEWDS. THE ENEHT FIRFIl 



liJ 



BFEr 



SUNK, SO 
.THE ENEHY 



SDRRT 



LIST 

i PRIIPT TAEl2AH'^3EAlfAR° 

i PRMfT TflBfZO);"i:BfAriUE COHFUTING** 
7 PREHT TAIMB} " NflRR I S TJ3LJit p HEU JEAGET' 



9 PRI^lYil 

]» PRIMT 
PRjHf 
PFP]#T 
EHPUT 
EF Dii 



■RINT:FRZHT 

"VQU CflHflAHB A FLEET Of SHIPS QPEFrHT^M «" 
•EMENT TEPfiJtORYMr- 

^SD rOU MEES ANY ASSIGIAKE": 
*TES" THEH PS 



If 0»^"N0" THEM 170 

PRIRT -IdFUr 'TEA-' OR ^NO'" 

GOID 4D 



90 

too 

Ti* 

120 
130 
14D 
I^H 
l&H 
17D 
2rD 



PRINT "TOU TELL VOUR OUR CKt^S THE ELEMtlOH TO SET THEEft CUHS." 

FftlilT "ELElATEOIri IS lif DEfiRtES FROM TO 340*- 

PftE#T -YBHR TASJt rQftCE CflHSlSTS DF 1 DE3TR0TERSp 2 CHUISERSp" 

PRllTT "2 BATTLESHIPS, AN| 3 REflUT AIRCRAFT CARRIERS.- 

PRIR7 "TrtE EffilT irAS f SlTlPS FQR If ^3 BEFEHSEJ" 

PRIiir "IF YQO SljCJlEELJ ^N SINlilNe ALL HlB SHIPS BEFORE HE SINKS" 

PRIHr-fflORS, fOU HAVE UDH. HflUEVEG^ IF HE SINRS All TOUR SHIPS* 

PRINT "BEFORE TOU RAUE BEFEATEB HJflp tflU HAUE LOSTM^ 

PRINT "LET U5 BEQllfJl!" 

PRINT "■ 



t2^ 
2J1] 
210 
?50 
Z^O 
270 
2i6 
2?0 
J40 

aio 

331} 
341} 
330 
3^0 
3fO 
4(5 
4t0 
420 
4J0 

H 

4f0 
SCO 
910 

520 

930 

^^0 

5S0 

SSI 

5?0 

510 

400 

420 

6Z0 

440 

dJO 

d4l} 

4?l} 

^SO 

410 

?00 

705 

JIO 

720 

730 

?5iJ 

?il} 

?70 

79 [» 

7?0 

820 

830 

340 

970 

G?l} 

9IIII 

9]fl 

920 

930 

940 

?50 

7iO 

9?0 

9Bl> 

99U 

10DO 

ID20 

TOJO 

t*5l5 

1»^0 

1l}70 

1090 

10?0 

TIlJO 

tllD 

UM 

1130 

1142 

n5(^ 

1140 

1190 

1200 

1^10 

1230 

1250 

]2A0 

ijao 



P .«D SJIDTp THE TARGET HAS ftQyEB GEJI QF'^ 
LET t TRY II AQAEN M!' 



*fr 



READ 1% 
AtA+] 
OOTO 320 
FKSTQRE 

Ef 0=9 OR A-? THEN 940 

FOR X-] TQ A 

RE All Zl 

NEKT H 

REj^B z* 

A'fl*1 

IF Ii=''A]RcRAFT CARRIER" THEH 390 

IF Zf»^*0-BBAT" THEN 2000 

IF ZtPT-TOPPEBD BOAT" THfH 3d0 

P-l 

SOTO 4l}3 

RESTORE 

FSINTiPEIHT "TUlft fLASGHIR REPORTS IHE SISHTIH6 Of AH ErtEAT ';Zi 

TH43O00.-3000O*RHB^0]t^ltN[rC0^*10)*.9S7iS4+l02 

IF T<10000 THIB ^10 

SilItP2=0 

T=IHT{T^ 

[F I(i'0-BBAT- THEN 3030 

fRINT -YOUR iHSTRUflENTS RErtD THE" RANSE Tp THE TjlRQiT A3 -;T;- flETEfi 

If F^^ THEil 1400 
IF S>4 THEH 510 

ei^TQ 540 

PHlNT "ALL RIGHT, 

PRINT "RAHGE 

SI^GUS 

QOTD 320 

PRINT -OHAT ELfyAtlON 

INPUT i 

PRINT 

l-RIid -" 

PRIHT --- — FIREJIE" 

S>^4-1 

IF B>JJO THEN Ml« 
LF B^O TH^N 7^1} 
JF B°iJ THEN 770 
IF B=?0 THEH 980 

IF &>310 TNEH 770 
IF B>ieO THEH 1370 
IF B>1S0 IHEH 13aO 
If B>11} THEN T0?0 
V1=i75.2B5 

£-rHTCT'{yr2/9.fl044a*SlHC3*B/57,a>»} 

IF ABSiE^ <* 100 TREH 9030 

IF E>ICO THEN 1200 

IF Ei-100 THEH 1250 

PRINT -SHIf BACKFIRE*, HILLLNE CR£U1" 

CD TO 02O 

PRINT "MHflT ARE YBH TRiTHG IG BO"? HILLflDNF FlSH^ THE SHELL" 
PRIHI -EKfJ_QBEJl ^IfDFR IfAlEI^ flFTT HETCR9 FRQH TOUR SHIPMl* 
£0r0 1590 
FftlHT " 

OOTD i5?a 

PRTNT " 

PRIHT:PR]lfTiPfJ|*T 
RRIHT "roo FIRED *p5l/ 
IF B=9 THEN »20 
IF ft"? THEN ?50 

PRINT ^ALL Of TOUfl SHIPS HAVE BEEN SUHH. SG 
BATTLE IS OVER THE EJtEur 



ADMIRAL PLEASE MM" 



• *#«4*^t PEACE 4*:t**tt+" 



ROUHBS^ THE EHEHr fEREH "r^^," RCEfflBS. 



SIPRY" 



.THAT" 



S if ICE" 



iBioriF rail shot sihaiamt upn, amei ike 

OH "TGUR QUH [rUN PQGITIDR^ BESHMVIND 



SHE LI ^ 
IT'^r 



T' TKEFC 1070 



CHAR9E EIPLUDED RIGHT DH TOP Of THAT BAftVMI' 



PfrlHT ^THE 
HOTO 5220 

PRINT "TOU NA^IE lEGliTATEl] THE EHENT ., 

PRIHT -THE BATTLE IS OVER fDU Ul*f- 

GGTO 2220 
PRIHT 'TOO 
RRINT -lAlTBEB 
00 TQ I5?0 

PRIHT "HET fltt^PlB, iOJJ^RE FIRING ON TOlR ONtt SHIPSI IT 
GOTO 13^0 
IF El^"ll-I 

SDTO 1090 

PBIHT "BEPTU 

GOTO 1100 

PRINT " *4 BOOH ^*" 

PRINT "■ 

Hi'-TARSET &ESTROrEB-M t**' 

»'"* *4 RDUNBS EXPENSED, *< 

fRiNT di;s;hi 

PRINT '^BU HAVE LOST -fQ^ SHIRS, 4^11 [RE ENEflT BAS LOST ";A;' 
Pl"0 

sorei 2S0 

[F Z*-"U-BOAl- THEH 2130 

PRIHI "SHOT FELL "|ABS(E);" KTERS SHORT QP TARGET," 

SDTD 1S90 

If ?t-i'U-B0AT" THEN 2I&0 

PRENI -SHELL BllERaHOT TARSET H ':ABS<E}i* NETEflg ■ 
OOID 1190 T I ^P 
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IJ30 

I17tt 

i:84 
ntt 

ME4 

H30 
1149 

H90 

I57& 
IfrlO 

i»e 

U79 

T7lfl 
r72l} 

Wit 

w?o 

1790 



I'fiwi - vQu sitm A pimjECTriE, ma the aih ■ 

PfllNI ' ir FEIL TQ T« HIEB, IQU HASH HOT IfttRE.- 

PfitHT -Dui I 10, mu mioi, tjiu just saw veuff ouh fleft tanvebm 

IF F=l THEir IZH 

aOTD <9D 

PFfWT -UMI AFE YBL TtryiNIi TO BD" DPUL A «Ed KAICUTT THE SHtLL" 

PRim -ElPLMtS U fijyp SHIf, DESEBUIIHG Ilm- 

Jf 0=9 IHCB 84CI 

IF fr'l mEH 15?0 

GOIO e2» 

FIflill -MERC lEl U lekKH TO TTPET ';l;-DEGRfl£ EICEEBB 360 »*■ 
mitJ l-ltO;- DEQFEF^." 

S1=3I»1 

If P-l IHEIf I5T(1 
5DID 4V9 

PHrhT -iH £iEir 'i?!:- rs firing ok youp ehipsi- 

M>l Z34>ILfDlSilS<0» >-ilAlli(0)l lOl 

IF mst* THEN l"fl 

JF P>l IHEV l«» 

IF IVI(P4><140 THEIr 1800 

TF Il-^U-ffOftT" TPrEH 3fao 

PRUT -HIS FltST RCUHD FELL ■:illT<P4];- 1EIERB SWTT.- 

nOTlJ 490 

IF P7=l IHH I47» 

PI=l»9>RHI(BllIll9J]-'lHflll(a>>IDJ 

IF pl>P4 rHE# lAac 

IF PK1F4-40C) THEfl FdM 

IF PUKO IHEH 17(0 

P4-PT 

SZ=S7il 

If ^l-'U-BDAT- niElf ?l?e 

PRmT -11^ ElEflli lOUNI FELL -;iilT<P1);- RETEffS SHUBT." 

eciro ITU 

37=52*1 
P2=l 

euajfl isao 

PRIIir 'TIE EHEltT 'fit;- SAUK -;ll 

If Q-f THEJI 940 

if »=-r|Ult LAST BITTUSHIPIF" THEH B« 



)7»0 
I MO 
IS10 

test 
me 

► fl!l> 

Tit If 

1170 

I 

I 

1»70 

IflO 

1940 

I95B 

1«t9 

I97» 

H7J 

'•ED 

ma 

2010 
»20 
2030 
2031 
2Me 

3»e 

2040 

2nt 

7IT0 
2U0 
2105 
2120 
3T30 
21 JO 
Z1»0 
21B0 
i1T0 
2201 
2710 
3! 20 
Of 



GOTO 4?0 

B2-1 

G05UI K 

PBUT "U FACT, HE JUST SAUK -;iff 

a=aii 

eQTD 17^1 

RESTCftE 

FQV C=l TO 17*01 

PEAI H 



HExr 

BfAll 
DATA 
DATA 
DATH 
BATA 
lATIi 

iaTfi 
iiirfi 
iATa 



c 

■U-MAT'/210 Htl SHORE BUN " , - 7{f, 009 T0« CffUI9£ir 
- B* T TL ESHIP" , 'TDR PE DO iBHJ",- llEflW YFT I G ftTE" 

-E'TTPE lESIPOTtR, "6(ll[IEI-flJSSl£ !iH 1 1"' f "A IBCBaFI CSRRIER" 
-ORE OF TOUR lESTflQT£E&M",*TOBfi HEtUI CROISERM" 
'ARflTHFP Qf TOUR rEgTMlEftfll i-,-a« OF TOUft BPTTLESBIPS ■ 1 ■ 
-runs LfiST DESTS|HtRi"',-raUfl AIRCItAFr CARniEflll" 
'VO!IJ* LEGHJ i:HUlS£lrM-,-TOil lAST AIRtRAFT CABBlERn- 
'IDUR L45T taTTLEBHIPll- 
RETURJI 

PRINT -YflUR FLA9GH3P HK DETFCTED il B-BOAT APPRIjnGHING flT 5 "! 

PltlDT -PlANTOfJa.- 

P'l 

GOTO 410 

FRIIfl -TDLJIt ^UGfilRIifE lETECTIOR EUfimE^T REAOS T4E miUE TO THE"! 

PBliTT ■ EARBET' 

T-|RT(T-1505] 

IF T<a THEH 410 

PBUT ■« -?Ti- JHTEIS.- 

PRIRI -TIIE U-BfliT HAS CONHEHCEB niUB ISRf^HEa AT TOBR SHIPS.- 

GBTB I4V0 

PRIHT -ms flPST TORPEDO EIFLDHD -.lUMftiZOr," fftlEHS BEHfRD": 

PRINT - iOat SHIP.- 

ooro isdf 

PtnuT -OEPTR CHABOE EfPLOBEB ■■MSltf," ItCTEftS SIHWT BE TARKT,- 
EOIO 1990 

PfillfT -HEPrH CUARG£ £IPLOBEB ";ftB5«);- I^TEBS flFT OF TABGET." 
GOTO 1590 

PfilHT -THE ERENT TOfiPEOQ EiPLOBEE 
PRIHT -FRDRT OF TDUR SHIP.- 
80T0 470 
ERB 



';|INTIPI>-S01j-HETERS IH' 




m:') 



Shoot 



The scene is sorne time io the near 
future You and another individuai on 
Ihe other sjde ot the planet are the oniy 
sjrvjvors or a total atomic war. (Yes, I 
know Ji's corny.) This war was fought 
tola fly with ground based atomtc 
missiles. Both you and the surviving 
enemy have found the fast missile 
bases left Jrom each aide. Fortunately 
{for me anyway), these missile grids 
are made and operated identically 

Each player moves on and is 
restricted to fl 10 by 10 missile matrix. 
Every co-ordinate on the grid cor- 
responds to a m in f- missile base. At 
every base, there is a terminal tied into 
ihe mam scanner computer, located 
safely many miles away. From each 
terminal, the pfayer obtains informa- 
tion relevant to the current situation. 
Because of ihe way the missiles are 
conslructed. Ihe area left after Jift-off 
is exposed to high doses of raw 
radiation and may not be occupied by 
life. The same Is true of an area thai has 
been struck by a missile, ii isentremely 
lethal and wotjld kiir anything entering 
the vicinity. 

Due to the fact that everyone else is 
dead, alf machinery musl be operated 
manually. This means that the players 
must set rhe target co-ordinates and 
latch the fuse for the missiletobeshot 
oft. After thai, the players must ties the 
area. This is done rn asmalJ shuttle car, 
equipped with sensor devices to avoid 
dangerous areas. But due to fta limited 
power reserves, itcangoonly two units 
in any direction, up, down, or diagonal- 
ly, and no more or less The danger 
involved is that while In flight, the 
player is away from a scanner com- 
puter terminal and wilf not know where 
the enemy missile is aimed to land. 

In Ihe hme It lakes to move to the new 
base, the missiles wilf beat (he apex ot 
their fright above Ihe earth. There the 
computer will grve out tracking infor- 
mation as to wheiher you hit the 
enemy, or he hit you. or both. If the 
missile is coming down to. hi( the 
player, there Is no escape. The time 
required to recharge the shuttle car is 



fonger than Ihe lime il Takes for the 
missile lo hit the ground, if either 
player is unfortunaTe enough to get 
trapped into a corner, the seeping 
radiation will eveniually kill him. 

So It is plainly a game of kill or be 
kifJed. However, don't he mis fed into 
thinking that it is simply a game of luck, 
several different strategies may be 
applied to destroy the enemy. 

Line by Ime explanation. 

Lines 4*^0-490. i assemble three 
commonly used print strings. S$ 
becomes a string ol fourteen spaces. 

Unes 500-530. Here is the dimen- 
sioning of Ihe four matricea. and the 
start-up and circle check dala. The 
matrices "I" and "H" stand for player 
and enemy playing helds (I and HE), 
the "T " matrix is a lemporary list for use 
by the enemy, and Is part of the "smart" 
algorithm. It js loaded up during each 
pass with the possible places he could 
move to, or looking at the possible 
places where the player could move. 
The "P" matnx is lilled with the eight 
possible co-ordinates that one may 
move to I might say here that the 
program may be modified for a longer 
and more challenging game by chang- 
ing the data in line 530. Change all ihe 
twos to ones and the two players may 
move only one unit away from Iheir 
previous position, instead of Ihe two 
used now 

Lines 540-730. I set up a random 
number to decide which pair ol corner 
co-ordinates the enemy will t>e started 
in, I then proceed to set Ihe pair from 
550 to 570 I then digress to rero my 
matrices. Picking up where I lefl off, 
lines 640 loSeOpeel away any unused, 
but unwanted data, keying on the 
unique first number of the last pair 
From there Ihe remaining data is 
dumped into "P." 

Lines 740-e?0. Make the report that 
the enemy has been "fooling around, " 
The starting co-ordinates for Ihe player 
are then obtained and checked. From 
there the valid loop switch Issei, amap 
JS printed, and Ihe program is thrust 
headlong into the main routine, 
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Lines 630-920. Here the co-ordinates 

lor the mjssile and the new spot to sit 
on are obtained and verified of their 

validity. 

Lines 930-1030 "Enemy" decides 
where player might be going from last 
position, and aims his missiJe in that 

direction. 

Lines 1090-1290. The "enemy" looks 
for place to go. If he has cornered 
hrmself, say so, prepare him for his 
e^eculion, and make it look like he 
hasn't fired a missile. Otherwise, he 
chooses a new co-ordinate to rest 
upon. 

Lines T290-1480. Now we move 
everyone around (where we can), and 
start to find out virho got who, if anyone 
at all. Then from 1430-1480 there is a 
check to discover whether the player 
has a place togoornot Knot, another 
message is printed and player will die 
quietly after output. 

Lines 1490-1780. Here the printing of 
Ihe two matrices is done. A value of one 
or zero Is rested for making Ihe proper 
symbol After the output Is complete 
"Z" is checked to see il anyone died on 
Ihe way. If no one had, return for 
another pass, else terminaie the 
program. 

] spent a lot of lime debugging this 
program. After I linaJly got It to work. I 
found that it became somewhat addic- 
tive. The tension does seem to build 
when the game reaches ihe final 
possible moves I found there are two 
different useful Strategies that may be 
applied. 

My favorite IS building a lence around 

the enemy with missile shols The idea 
is to cut o-ff his movements while irying 
lo keep out or his way The other 
method is the one Ihe enemy uses 
Here the player shoots ai where he 
thinks the opponent may be each time. 
Quite often the game is ended early, 
the odds ol being hit become too great 
Any method you use. or another you 
may thinJt of, will lend long hours of 
enioyment Have fun' 

The program and description were 
writlerr by David Spencer. 



RUN 






PD IDl HANI I15TRUCTIDHST rZ3 

IT IS THf flilflL HOUR OF HdH. TWJ Mlt A UARHTtte 3AT1QJ! 
HAVE EHTCJES HTB A LflST tOKTEJT. ALL THE LIFE NDi^ l£fT ON 
EARTW ARE TOO ANI> tOUir CNEHT, BDTi HE ANA TOU HAVE FfllWEl THE 
LftST ITEnaiKIfQ ftTOHIE rtrSSlLF SJLtt HflTfttCFS ESTABLISHED Et 

THE NflU-BEAD SliPEHfOKESS. HE, LlK£ TfltJ, UISHES ifOT Ttt DIE 
BUT Tfl LIVE JH PEflC£, 

ffflHEVER U HAS BECDflE AP?AftEI#T THAT BE FEEig HJS PEACE 
TftflEATCNCi AND IS PFCPARIflQ AH ATTACi;^ IQTH YOU AMD NE HAVE 
SCANflEHS THAT UILL UAflPC TOU Qf FfIS liaiJE}IENT3 .=i4E TffflCK THE 
FLIGHT OF HI5 ftTOMIC HISSlLFSp THUS Hf 16 UDRKIflG SLflWLT. 
THE EBEHT, UKf rQlflSELfp Hfl5 ft JJISSILE GRID rtEflRLT 
IJEHTICflL IN STRDCTUGE ANH QfEPATIflW Tfl TOURS, RECAUSE IflU 
ftRE TtfE QULr eilE J_EfT, IT Ulil » HEDEBBARY TO fiftt ALL TOUR 
mSSIlCa NAHOAUV. (|flC£ THE fUEE IS SET^ TUU flUST FLEE THE 
AREA AND S(T TUO ORil ONIT? AUAY. VQU HAT NFVOt Kl\iM 7D 
THJS SPDTp OH A SPDT UHEGE A ttlSSELE HAS ii^MEiEI?: TRE 
RABEATIQ^ IS INTEit^E ANi UdULD HEAH M Itt^TAMT, PAIHFOL 
DfAlH. 

SO THE 9TA5E HAS BEE* SET. THERE JS PEACE LHTIL THE 
SION THAT THE EHEHT HAS Hfll/Ei TO H|5 HI^SILE RAHBE. HE UTU 
FlfiE EyERy TIME TBI) UlLl^ AN^ Im 5Q UHTU DHE tf TOl IS 
DESTROIFI. 

EACH TLHE Fl RDUND Of AfSSILES HAS SEEH FlfiEIi^ THE 
SCAtfNERS BILL REPORT THE STATUS DF BOTH fOUR-'S AHi THE EtiEHT'S 
GRm TERSITORT. IT HILL SHUU ALl AREAS THAT HAVE HAS EITHER 
^ FISSILE HIT DR A HISaiLE FJREB FHDH 11, UlTH THIS 
Cfl^TINUALiT UPIATED ftAP, roi HAT BE AtLE TO INDUCTIVELY 
lISEDVElt OR TRAP TOUR QPPDNENT. BEUARE, HE UILL BE TRTIND TO 
ID THE SARE Tfl YOU. 

StMHEf^ COtirUTER: EHEHT ACTTVLTr ON QElB AT 1D ^ 1 

TDUA START INS CD-flR^tllATEST 3p3 



rODR TERRITORY 
1234547S?li) 

3 J:*::::::i 

7 : ::: citrir 
1? [Et^^!=S:: 



EflEeiT TERRITDJtT 

l?3*Sd7B910 
^ - ' - J i 1 1 1: E 
i itlllitizz 
5 suit::::: 

4 :::::::::: 

5 :i;ijjj::± 
a : : :? s 4 s s E J 

? ]tl]i::::; 
10 *:iiiiTijj 



MCSSUE CO -D RBI HATES? Ifljl 
UHEflE TD HOWE TDT 3^3 

SCAilNER COHPLITER: HFT' f^]l GOT HIH"! 



TirUfi TERRITflRr 

12J45«P8?34 
I ];i;*it[t: 
1 J:;:::::: 
3 lt*lzt:m 
* tf::;:;;;i 
) S::::::: et 
i [1!?:::: 
7 :::; :;i; tt 
■ ITif^::::: 
f :: ::;;^ E] ! 
14 t ::::::::: 

HP 



aeHT TERRrroHT 

3?J45d7S?10 
S ;;rtj 

2 iiiititifi 

3 :itt:::::: 

4 :]] ::::::: 

5 f E j i:::::: 
J ::]filE-j- 

fl :i:;illilt 

!l*bB ■■■ m w M 

10 t;;ftii tit 



RUff 

SHDor 

CftEATIUE CUHPUTIHG 
HQGFriaiOUN, HER JEI?SET 

ED VJU UART liigiflUCTIONST I4D 

SCAHR^J) CflflPOTEft: ENEflT flCTIVITT OH GRT* AT 1 , 1 

TWP START I HG CO-WlDIHflT£J' 2,5 



rOUR TERRITUSI 

T2345A73flC 
1 ;;;i;ie::: 
? :::±*:illl 

3 ^^!l:±:::: 

4 ::ss;siEtE 

5 E±::::::: J 

4 ::::: ;}x:i 
7 irFl::::;E 

1 ±l::;Tjril 

10 tllltLt^:: 

HISaiLE CO- ORB I Nfl TEST ^,1 
UURE Tfl HOVE TD^ 3, 7 

TOUR TERRITDJtT 

123^S6;^^^^D 

3 irt::::::: 

2 l!t :+::::! 

3 l::::::;ii 
i ti«ii::::i 

5 ::]::;mii 

6 r = ^£tkTMT 

7 SlJllEtEit 
S ::::::t;rt 

1t :::::ptltl 

flISSJLE CD-riPD:JfATES? t,^ 
UHERE TO HOVE TD? ?,? 

TOD* TERRIinfiT 

3 ::::4::*:*i 

3 l!tl!^!S^= 

4 t:4::::;;T 

5 It:::::::: 

4 rtiiEiEtir 
J^ I:j±:::::; 
R L:jt±]titJ 
f :::::::::( 

10 StlltJtlLl 

HTSSILE CD-OfrHHATES» 3,4 
HHERt TO Hay£ TU"' J^? 
WERE TD HOVE TO? 4^9 

TOlR T£J!RITDRT 

17345^70^10 
I ntltEE^lt 

5 !±^!^!*^*: 

4 11*1 1 J'E-:: 

5 t f:::::::f 
4 ;;;:;:Et!: 
7 ::::::itM 
D ::;;pttE:£ 
? ::;;:ftEtE 

II IIIIEtElBt 

HISStLE J^D-flRDIHATE^* H^S 
UHERE Tfl HOVE TUT fi^^ 



SCANNER COHPtfTFRl METi TOU 6QT HIHH 

SCANMEfl COHPUJERS TDfl HOVED RIUHX UNDER tilS HISSItEl 
TGUft TERRS T UN T 



ENEHT TERflllORIf 

12I49i?ef1C 
T *f£=!::Tir 
? ;iite±::;; 

3 ::;:jEttt1 

4 lll^ssME1 
3 ::;;iaitiE 
^ iMIf::::: 
7 ::;i;i:!t± 
R flEi::::;; 
? itEl^±:::: 

10 tkJltf;;tt 



EREHT TERHITOSr 

12345A?3910 

1 4!tf:::::: 

2 lltlE::::: 

3 ±:::::: t ; t 

4 *^f±^±:::: 
i ::::j;;EtE 

i Iie: 

7 :;FrIEf^^^ 

T ItlTEItEtl 
10 ELi:±±:::: 



ENFBT TERHITIIRT 

I234^7g?fa 
1 *r*:*Jiii= 

3 tl: 

• 4:s;;;EE;r 

3 r::::::;;; 

4 titElit!tf 

I iilEtitttl 

f ::::::::]! 
10 !ll!£!^:t: 



ENEHT TERRITUHY 

12349473910 
1 *tti*]E±f^ 

3 :::f*;;;fl: 

S :::::;ETflt 

4 ±^::::::ii 

^ :: ;; 

a !±t::::::: 
? i:i::,':::: 

1-0 i:::;itiri 



1?J49J7ByiD 

1 f b ....... ^ 

2 ::::4i«|t| 

3 ;;:;fi!=i= 

4 Ei4t::*:t| 
3 :::iiTE1 E] 
6 iiixiiti^i. 
? Ill 1 

5 ;;;] !::!:^ 
f E j :f ::: ::; 

1( lEIEti:::: 



ENEHT TERRfTOHT 

12J4Si7S910 
1 *]4E»f^:::: 
1 Iet::::::: 
S ±t4**:E3 11 
4 *;;iiEtLtl 

4 ±:::j;iEtt 

? ::;t1itEtt 

a ::::::::!! 

f ;;:;e;i at 

ft ISIIEIiltl 



l-f^d 



:fl Pfi[?jT TftBCJU3;"CRErtTiyE CiJ»lPUTT[te'^ 

4t P(r[«TtfPLHT:PRm 

11^ INPUT *[?D fflU UAJIT INSTRIJCT[GNS-;A4 

121] IF UFTI(fttJK>"r 6DT0 fl^O 

tJU fRIttT 

t4l} PrtlflT * IT IS THE fJUq^L HOUR QF ^N . TG^ AHS A UAfleiNG ilATIDH' 

nft fRIflT -KflVC EHTEflEP IffTO fl LAST CIPNTE57, ALL THE llfE WDU LEff DH" 

>^4 PRINT *£Aft1H ri^FEE TQU AND YDUR ENEfff. BDTH HE AHB fDU IfA'^E FDUNr THE" 

t?D PRIflT "LAST REHAINIHG ATOfllC flISSILE SEID HrtTRICES ESTriffLISHEl BT'^ 

IBD PRll^T "-THt tfOlf-HfAIr ^ l^PEl? P Dkf Efi & . HE ^ LEIiE rOU, LUSHES tiOT TO BIE" 

lf^> PRIWT *&E]r TO LITE J^ PEHE." 

2PD PRII^T " NDUEVER ET HAS BELOltE UPMREHT iHfiT fJE FE£L8 »}i PEi^CE" 

:!1l> PRINT "THFTEi^lCNCb AND ]J PREPARlHa AN ATTACK. BQTH rOlT ANL HE llA'JE'' 

225 PRINT "SCANJfEllS THAT UIU UflRil TOU BF HIS 10";EP*E*|13 Mb tR^C^ THE" 

231} PRINT -FLICifT DF HIS ATDHIC HI&SILESp l}fUS HE IS IfDRKItiS SLQULT." 

2^D PRINT "IHE E«iHT, LlKj rOnRSElF, Hi^& A Hj^^lLE QfltB NEflfrLT" 

251} PRINT "iiiENTTCAL j*f ?tfiijeruflE ft*i& o^gftatjoh tc vduh?, Kcmsi tnu" 

265 PRINT "AfiE THE flHLY flNE LtFTp IT UILL BE ttECESSAHT TO fIRE fiLL IflUR" 

^^1? FffLNT -n^$SILES nAffUJ^LLY. OMC£ THE FU^E 3^ SETt TDU HUST FLEE THE'' 

^HO PRINT "ftiilEfl flflC GET TUfl GRID l^NITS Alt AT . fOU flAT NE^ER RETUBW TO" 

??0 PSINT "THIS SPQTp QR A SPQT UilEllE d^ ftlSSILE HA5 LAtfDEB; TRE" 

350 PHLNl "RA&JATIQH IS IMTE41SE ARIi UOULiT tIEAK AN TFfSTANT^ PAINFUL" 

3P0 PKIHT "DEATH." 

3^(1 P£[NT " SQ Jn ^^A\iZ HAS ECfN SfT. TMESE |^ PEACE UNTIL THE" 

330 FIITHT" "SIGil THAT THE E«Effi Hfl& HDVEIi TO «1S HIHSTLE RA*IGE. HE HTLl" 

,i*C Pll[*IT "FfRE E^EFTS- Tint TUU ulLL. flIfD DO SO DilTlt. EjifE OF VDU IS" 

350 fREHT "IiESTRflfED." 

340 PlilMT » EACH TINE A ROUND OP ttl^SUE^ HA^ SEE^r F|F!£Dt THE" 

370 PREilT "SCANNERS HILL KEPttRT THE STATUS Of BDTR TDUR^S flNIf THE EHEHT^ 

s- 

JSQ PFtEtIT "GRED TERRITDEr. LT tllLL &Hfllf ALL J^REAS THAT HAVE RAH EITHER" 

3?P PRI*(T -fl MISSILE KIT Ofl A TISSUE FJBED fRON LT, UHH THIS" 

«fl PRIilT ^CDNTIRUALLY UPDATEH HflPp V&D fiAY BE ABLE Til IHIiUCTlVELV 

4lD ^RlffT "DISCOUER DR TftJif TQOR DPFQHfMTH SfUARf^ HE UIU BE TRTINfl TO' 

421} PRLHT "BO THE SAHE T5 ^DU." 

«5 PRJJfT 

411} Gt^^ ^12345ri7a?15- 

455 C*^"SCAttNEff CaftPlTERS * 

165 5f=-^" 

^?5 FQfi J=l TO 14 

J1B5 S«-5lt' ■ 

^?0 NEXT X 

5L0 Lift in5jt5hp*l<]5p10] J<BT2hpPCa,Z] 

^20 DATA E0J5 ^ U^ h TO, 3 p MO ^ '0,9 ^ ?,10 , It^ i ^^ 

530 IiATA -^p-2 , i]t-?p 2p-2p 2pil p 2^1 p 0p2 j-^fl r^f^ 

?40 GE[lll(tNDCJ^tfl«n 

550 FDR X=1 TD R 

540 E^EAD At£ 

5 JO itExr H 

580 FDR X=1 TD lU 

5*0 FDR T^l TD ai} 

iOO I{K^T)iO 

rilfl tt[ItTJ=0 

i2l} flElT y 

i35 HEIT If 

ft<5 £F ft=? eOTO i?1> 

AS5 fDE ^"=1 TO S 

.^^5 REAP CpD 

ii?5 IF C="2 OQTD 4^0 

dD5 NEKT K 

4?5 FQI! X>1 10 

750 FQfl V = 1 FD 2 

?lp REAL Pa^t} 

720 NEiT T 

750 E^tUT K 

740 FRINT C1;-ENENT UTIVHt OH SRI^ ftE-;«rr''!B 

750 ffftlfT 

7A0 I«PIT "TDIR aiARTlNO Cl-ORIHWATES 'pE.F 

7^0 ]f £<S OR E>15 OR F<1 DR F>10 QilTD 7iO 

7ao Z^l 

7?0 KEpF)^! 
BOO ll{A^E) = 1 
mo PREHT 

8?0 ODTO 14^5 

a30 INFDT -ttlaSlLE CO-0n[llNflTES-;H,H 

Si^ IF n<1 DR tlMO Oft N<l OR il>15 ODTO 330 

fi5{^ INPJT -UHERE TD HOVE TQ"|ShT 

e4i> IF $^1 DR S^lO cut T<1 QR T>15 GDTO S3I} 

B?1> IF HS^TJ'l QOTD 811 

BS5 FOB KT] T5 8 

flf5 IF pa^ntE»3 Arte reXnU-if'T goto ajo 

915 GOTO SthO 
?J5 FfiINT 
930 L*T 



7*Cf FOR SM TO B 

950 If P[i:p1?*E?15 01? P^Xpn+£<1 OR fCXp2J-+F>10 DR P<Kj5}+f<l 0310 1050 

V40 If HF(;c,IJ + EpP(j:,2?tf)-| 6CITQ 1005 

770 T[L^t]'PCJ:|l}tE 

PSO T{Lp23="P(l,2}+-F 

1000 NEKT X 

1015 L"L-1 

H]?0 EF U01 fi5T0 lOifl 

lOiO E = TCLpn 

10*0 B=Tap25 

105O GOTO m?o 

Ji]^5 S^INT^FtHD<1}*L4l} 

iPi'O C=TCD,n 

11]B0 B=TC&p3f 

11]90 L'1 

1150 FDR J<="1 TO G 

ItIO IF Pa^n«^^CJQRfC?,l?-^A^l Q^ F[3:,2?■+BM50HP^:f1J?-^B^] eoTQ 1160 

1I?0 IF H[P(Xp^^-A,PUp^3■tB]^1 GllTD IliO 

1130 TtLpn=pnjn+A 

ir« TfL,:]iFiS^23tB 
1P5D K + l 

ii£0 tiEtT j: 

n75 L-L-1 

ISSP IF lOO ffOTO 12?5 

1170 FftlKT Ci;-THE EMEiTf HAS CDRNEffED HinSfLF IHE!* 

i:OD I-O 

120fl C^E 

UO? [K^F 

1215 EOTD 12^5 

i:?IJ If L01 GOTO 1?i5 

1235 J=T(1 J] 

1145 ll»Tll,2l 

1255 GOTO 1290 

1245 lJ>[tfrCR^B(1»t.4l) 

1275 J=T{GO> 

12B5 t:=Tf6,2k 

i:95 H£,F^ = 1 

1305 Htfl,B^=1 

1^15 I<C,t)3l 

T325 K[tfpll?-1 

t335 IF HOJ DR HOT GOTO 13^5 

13^5 PRINT CJ;"HJV' fOU GDT HINII" 

1350 r*o 

1340 IF DOS GR DOT fiOTO 1390 

1370 PRINT Ct;"TOJ NDVED RIGHT U«DES Hl9 EdS^TLtlT 

13ffO Z=& 

1310 E = 5 

nOO F=7 

mo A=J 

1^20 B=K 

14^0 FGR i^-l TD B 

H40 IF P[aTtJ+E;>IODI!P^Kpll4E<1 OR FC^ f2>*f>lilORPiSp ^^-^F<l O01U HfiO 

mo IF HPU,lJ*£jP(tp25+F5'0 GOTQ H?0 

1^40 NEXT i 

1^7(r PAlE^r CtrFOQJ." VD5 RAVE RD^ED YOURSELF lilTD A Zm^ER^\** 

HBO 1=0 

1^70 PRliTT " TOIR TEWrTOBT ^^"ElfEIIY TCMHORT- 

155^^ PRItfT 

ism FRItfT G*1SI;6I 

1J21} FOR 'i=\ TD 10 

1H1} If rilO 50TD t^iQ 

1545 ffllHT X; 

1335 ioia ISW 

T545 fRIHT "15 ■; 

n75 FDB 1 = 1 TO ID 

13B5 IF EU,T^-1 DDTQ 1410 

15^0 PRINT "^"i 

UOO 50T0 14^0 

1410 PRINT "*" 

1A70 NEltf T 

1630 PKirtT " "TSl! 

1A40 IF X=I4 OdTO 14?5 

mo FGEEJT it; 

1A£0 DOTO UB5 

1i7^^ PSINI '10 "i 

IfrEO FOR T^T TD lO 

1j9l> ]F H[j:p^h = 1 IjDTP 172D 

i?o* pRr^r -t"f 

1710 GOTO 1730 
USD PHm 'r\ 

1J35 ilEJlT T 
T745 PRfNT 
Via lf£XT 14 
1J45 PRINT 
t77D IF Z-f MTD 
lJfl5 END 

or 
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Smash 



irUH 



This game is a one-lap Jalopy race. 
Therff is one big probfem: you don't 
know the shape of rhe course or the 
safe speed wilh which you can go 
around rhe comers Consequently 
you re likely to smash up farriy fre- 
quently or else go ao slowly that you 
don't earn a good placing among the 
wfnners. However, after Jour or five 
plays of the game you1l begin lo gat Ihe 
hang of it and you'll be able to whfp 
around the coufse In grand fashion. 
The Insfrijolions In rhe program are 
qutte deiaifed- Have funf 

SMASH was "ivrltlen by ScoH Byron 
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no T8U uAffT ro PLflr amiht tes 



T^JtEfSEf) 


NILES TO GO 


fl.P.H. 


PDSITJCM 


MUVE 
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13 
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? 1 


31 


12.774a 


;7-( 
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T 2 


Al 


1^,3t» 


4fl.4S 
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T 2 


»1 


n^4A?s 


94.775 
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^ & 


120 


1S.«!1 


Sa> 2:^17 


A 


■f d 


]3I 


1D.J7JS 


75.4221 


A 


t 2 


itt 


¥,3113? 


]?1.^3J 


2 


f J 


210 


fl.44B£4 


3^3.554 


4 


t 8 


M 


?.J60D4 


e(l&.d^2 


2 


? 2 


2?0 


t.147lj 


fi^-M? 


Z 


^ 3 


3Bft 


^.9Jlaff 


t45.ei!j 


i 


1 7 


UC 


1.10?17 


^6^74137 


2 


7 a 


3Je 


;.J?^os 


1E?*111 


3 


t 3 


3ff 


3.43J7S 


13£,?d 


A 


1 7 


424 


»^J7t33 


107.73 


2 


T i 


435 .3B? 


e 


172.625 


7 




TN^T EJfCS T*tE fiilC£f tm flftCEH H 2 






fDUK AlifR^DE 


SPEEH UA? 1«7. 


.4^S H.P.H^ 






tD VOU UAMT 


TD Pt-AT flUAIH^ 


Iffl 






J3I. 











Dfl rfllf tfEES iltSTRUCTIflrtS? TEB 

rurS IE SnflSH"THE OAME that SJnULflTE& fl CAR RACE. 
TDU Ulll RESPSffEi IflTH BhE Of THE FBLLBUIHG HflJfUE'iEP! 
VNEM A ^T-' IS rvFEI'. THE Pfl^ITIOH NUMBERS REFER 10 THE 
POINT liT IfriJCH TCU flJTE OH THf Til i^Ct: - THE^ G& A^ rOLLOU3i 

1-TrtE START LINE 

2-HlD ^TRAIIrHT-AUAT 

3-COMIKG UP DM A LEfT TURft 

4-IIID LEFT TUfltf 

5»C0H]lfG ]!P DM A ftlGRT TUIrN 

t-PlI&-li:B«T TUkK 

?-THt FINISH LIi(F 

t-FCDOS IT 

Z- ACGELEfiA T£ ( NQOER ATE : 

3-BRAKE SLIQHT 

4- J AM OH THE BRAKES 

VBMA*:P ftEBHT 

A -fl DEE RATE RIGHT 

7-SJlA(:P LEFT 

B-llO0£HAT£ LEFT 



TlPJE^StC) 

30 

^0 



HIL£& TO 
U 
T. 7^147 

?.J2T17 
&.J52?: 
7.9tl5 



33.1 
?3,15 



SNilSJI—rolJ WENT Rl&HT ItfTO THE UJtLL ' 
PD rOU UAtfT TQ I^LAT fUjAEJt? f^s 



tlHElEEEJ 

y 



MILES TO 00 H.P.H. 
It C 

10.021? :i,4 

5iASH--T01^ «ftT filljHT UTil THE UALLI 



PBS IT I DN 

t 

4 
3 
4 

i 



PflElTIWf 
1 
2 
2 



^ 1 

T 2 

T 2 

f 3 

T 1 



HO^E 
? 1 

» T 
T 1 



LIST 

10 PHINT TAe(2£^;''^rtA$H'' 
20 PRINT TAO^SphrCREfrTIUE CflriPtI T 1 Pfli " 
3D PPIHT TA6nef;"tiSRIIISID«W^ flElf JERSCT" 
4D PKINT:Pfri#T:PR]i|i 
M tlh AL7l,JI6> 

79 PFlNr^HO TirU HEEf I ItST RUCTIONS'; 
SO INfUT Z% 
PRIflT 
FOfl X^l TO 7TlT£ftD ACKkiilEKT 3 

FOfl X = l TO a:REflO JCKHNEIT I 

[F LEFTItZJpJf-'-fl' m*^ J5C 

Pfil»fT"THIS IS EMA5H--TilE GAflE THflf SIHULIiTES rt CAR RAlTE.^ 

PRIJfT"raD UILJ. RESPOND UITM DNf Of THE fOLLOUlNS flANUtVEKS" 

PRIIfT "UtfEN A 't' [s TTfED. THE POSIUUN HUn&Eir& f£F£fi TC THE" 

PRllfT-fDlRJ AT UttlCH tOU ARE OH m TRA^:K-TH£T SU flS fOLLDliS;" 

PHTHT 

1-TWE BTAflT Ll*fE" 

?-mfc STEfllBRT-AHflr- 

J-COKTttB OP ^H ft UFl TUflN" 

*-MI[^ LEFT TUftH" 

S-^QflLNCI UP Ott A RIGHT lUJ^N" 

A'rt!D-R]&HT TOSN" 

^'-THE FlHIStf LINE' 



too 

105 
120 
UO 
140 
150 
IJD 
17<| 
TOO 
T¥0 
300 
210 
220 

:]p 

2i^ 
250 
2^0 
?70 
2S0 
2?0 
300 

:)io 

3Z0 
33fl 
34fl 
J50 
l&O 
370 

lao 

4DD 



FftINT 
PflINT 
PRINT 
m\fl 
PRII*T 
PRIHT 
PRJMI 
PJf[HT 

ffrlNT- 

PPINT" 
PRINT- 
PRINT" 
PfilWT" 
fR]hT" 
PRlifT- 
PftlilT- 
Ptl«T- 
PtlNT 

FftINT"TJHE^SECr'H'MILeS Ti? 
LET ^'EHTn04||HIirt^tSi:r = A 
LEI B=0:T"fr 
J.£r C-1 
OO'fl *?0 
L£l C=<IHTL:*ffNDC1kt5?J 



HfiNEUyfRS" 
l-FLDOR IT" 

:- AtCE LEPAT E C HOLERA T E r 
3-BRAI;E 5LJ8NT- 
^-Jftrt ON THE BftAi;£S" 
5-SJlAGP ELBKT- 
i-natErtftTE RISHT" 
?-BHftRP LEFT" 
S-HO&ERIiTE LEFT^ 



ei3V^H.P.H.V"WJSIT|0lrf".-H0VE" 



ise 



^20 

+ ^i^ 
45fl 
440 
^70 
^30 
490 

510 
^5t^ 
530 

550 
SiO 
370 
5 BO 
5^0 
4DD 
^iH> 
62i\ 
Ai^ 
iiO 
^50 
d^O 
i70 
450 
■i?0 
7 DO 
710 
720 



PSINT T,A,B,C, 

iHfUT D 

IF DOIffTtBf T«Efl ^70 

IF IJ>B TH£H 47fl 

If ff>iS ThtEil ^^g 

Pffl*f7"DHE mpu EIGHT DNLI" 

GJfTO *?0 

if DOI THEN 510 

LET B=J*&*20+I«-rciO-*RrfDn5»?1 J/10 
[F B02 THEM 534 

LET £="3*B/£4 74rHrn0tRttDO5^iil)/lC 
IF &03 THEN 550 

l£T E = 7*B/B-i^Irt|[]iJ+RHJin^:*4lJ/10 

IF D-;>4 TH£H 5?0 

liT S=^*B/?-2i4lNTnO+BMtf1S*aih/10 

if 11=7 TftE*l ^^0 

]f II05 THEN iijfl 

LET fr"fl#'B/10*l.7+Rlfri(rJ*^4J 

IF Ii = B THEN m 

[F B<^4 TftEN 430 

LET B"n»H/14:tf.7+RHII(l)*pfiJ 

IF B>1] TH£fl am 

lEr B-0 

IF fl-fi/15|iMl THEN 730 

l£T T=T*ft*3fiflO/& 

fllI«F TpUfBp7 

PftlHT^'THflr iUK THE RACEp VDU PLACED rtNTd/iSOpnTI+.SJ 

Pfrl«T-fOUR AVERAGE SPEEB Ufl5-Tt3ft00/T"H-P,Hp- 

IF ]mfT/C20*YJ*.5lOl TMtH ^Bfl 

PfiINT*THJ5E UA^ fl PtRFECT RftCEp tttflUfl" 

GOTO 9&0 



730 


IF C02 THEN 741] 




?40 


IF 11 = 7 THEN ?iO 




75i> 


IF Dps then ?iO 




7J|} 


IF C=l THEN 7SD 




?7fl 


IF COA THEM QftO 


■ 


730 


IF B»S THJN ?iC] 




J90 


If B=4 THErr f^O 




BOO 


IF a T^IU AM 




BIO 


!F COS THEM 340 




fl?0 


IF Ba7 THEN ?iO 




83 D 


IF Oiff THEN ?*0 




ai<i 


JF B>J[C5 THIN P^O 




350 


IT |NTr5+ff*fDfO>+7/H>J0 THfN fiflO 




e^o 


Pfi[Hl"5Hfta«-¥DU MVE &&EN HIT Bt 


ftNJPIHEA C 


a^o 


QDTfl 9^0 




BSO 


LtT T"T+30 




a9l> 


LET fl=rt-fi/!30 




?flU 


IF Cnt TH£N ^IG 




^10 


IF ti^ THfN 410 




?!D 


JF C=? THEM 410 




?3(i 


EF C=4 lH£f< ^10 




?40 


LET C*Ctl 




9 SO 


QOTO Ali 




940 


PRlHF-'BftB nOLif" 




970 


PRINT "5*IASf^--TDL" tf EJI F filCHF |NTU 


THt EMLL! 


9fll] 


?RINT"II& YG4J UANT ID ^L-Ar ftSAIH"; 


- 


y^fl 


IlfPUT Z* 




lOCC 


■ IF L£fTlC2*pl3="Y- IbjEH 350 




1031] 


' BftTft 2p3p^HM.l,2,20O.24Upia0J7i},taO,1?a 


1030 ^r^n 




Ok 







CAR r r 
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strike 9 



Thl3 IS a sJmpI* game based on the 
numbers 1 through 9, and a pair of dice. 
Flral, the computer rolfs a random 
number for your "dice." Then yo J must 
take that n umber from the total of you r 
board numbers 1-9, To win you musl 
remove al I of y o u r board n u m be rs. W j Th 
each roll you must remove the total 
number of that roli from the board or 
you lose. 

One strategy is to remove the fargest 
numbers possible with each roll, or you 
can try lo get the most numbers 
removed. For example, If the roll is TO, 
you might want Jo remove the 1 , 2, 3 
and 4 instead o( the 1 and 9. 

Vou may want to have competition 
and players oan alternate wilh rolls. 
Then the player who can't remove ail 
numbers from his/her roll loses. 

Strlke 9 was conceived by Bruce 
Grembowski and first appearecf in 
CreaUve Computing, Jan/Feb 1977. 



RUN 



STRIKE 5 

CftEATIUE Ca^PLITJNf 
NDARISTDUN )CU JERSE1 



10 YOlF NEED iNSTKlfCTIBHS ^ TES 

STRIKE NINE IS PUTEJS LiTil |Ei PftiP DF HCE *ND A 

tOAI^H if]TH JrmE 4IJM?tRS± 1 2 3 4 5 4 7 S ?. YHU 

ARE eiVEJf A SflLL ANIF CAJf liMOJ^K ^FT U^ Tfl 4 NUn&ER9« 
IF TDU ir^PI^T THAT TOll UANT TD SEHl^'iE S IfLmKRer TDU 
tl[LL ftE &1UEN A tHflPT DF TilE N3>HBEP5 ^CHJ rtiHiE LEFT 
TQ ftEflllVE. HE?:T TDU input i^Qlrf ?1AHV iHUKfLRS VOU ilA^r 
10 READ^Ep ANIi T}IEN INPUT THE ilUiHBEfiS "VDU UA^T TQ 
TAKE OFF, QHE AT A TI^E, THE N4JM£ERS TEIU TAKE OFF 
i^UST 4)»Ii UP TO TilE EDLL . TDU UlN ftt REHQiJIHG E^EEV 
^Un^Ef! FFTDM Ttl£ BQAfcB. rOU LPSE IF TQU CAMheQI 
REflOvE AU «UflB£fi5 «irn lift ROIL TBU HAVE* 



READT TQ fLArf 



1 2 3 ^ 5 J 7 



? 1 



Htkl IS W£ IDARH: 
Tauir BALL 15 B 
41 0^ Nl^NBERS TO GEilOVE 
tfflAT [S THE hUHMM e 

TQUfi ROLL IS J 

f1 Of NUASEJ^S TO REHOVE 

LTfli^T TS THE HtiNBEfrT 2 

^ I 

"YOUR ^OLL IS ^ 

HUhfiffiS TC REMOVE 

ES T«E frU^Sttt^ 6 
"VDllG RDLl '£ ? 
f1 OF NI^MB^S TO REMOVE 
UflilT ES THE HUMIEft^ ? 
■VnUI RtLL IS 7 
N J3F NUHBfRJ Tl? ftEhOVf 
UftAT IS THE miHBFR^ 7 
TOUR ROLL IS T 
H O*" NOflBtfiS TO REMOTE ^ 5 
TkE HUtlKEftS rOEJ HAUE LEFT tq RE^OuE 
H UF NOnsER^ TO EEMOUE T 2 
UHl^l 15 THE HOAEER^ ^ 
T 4 
VOUG ROLL IS 7 

sDFtfiTp rou lOST tk:^ rwE- 

TfitAE ARE 1 I^JilBER: LEFT ON THE bOARli^ 
U^VT 10 TGT AGAIN €?£S OR IfO}^ MO 



41 CF 
UHAT 



? t 



T I 



t 1 



ARE I 



LIST 



TO PRIHT TAH2?5r'STRIHE r 



2* fRIMT TUnf). 
i* fRIKT TABM&J: 
fO VI41 At?3TEi(43 



■CREATli"£ COflPUTINO- 
'MORRISTDiJrt H£\^ JEfiSE^ 



TfO 
t70 

ta« 

T?0 
200 

210 
210 
Z30 
3^0 
3S0 
2dO 
2?0 
2ftO 
2^0 
300 
310 
3?l} 
34P 
3?^ 
335 
3tQ 
3?l^ 
3St 



05 
]£ 

^0 
40 

10 

^0 

£5 

70 

00 

?0 

300 

530 

520 

5J0 

540 

550 

:4^ 

570 



h 



PRINT:PflJNT:^l)tr 
PRINT -BO i-QU HEED 
Rl 

^"NO" THEN J40 
O "ri^" THEN 170 

'StF^lKE NINE IS PLATEEi vrTH A P.41R QF HICE AHD A" 
*BDAilIi tflTh NINE NUMBERS: 1 2 3 4 5 i ? 9 9. VOL"" 
*JiRE GIUEN A ROLL AND CflH JINOCK DFf MP TO 4 PtilMFERS.* 
•IF rCJJ [NPOT TftAT TJIU l^ART TO RENOLt ! NClrtBEHS^ TIfU' 
■^lIlLi BE eiVEJt A CKAflT BF THl HUMBERT TOU i^fiVE LEFT* 
■^TD tEJUUEr NEXT VITU INPUT H*HJ XAN"f *tU*l&EJ:S TDU Uf^HV 
'TO SEfl&VEr Atfli THEN iNPuT iHi LUMBERS TDU UAhT TO ► 
"TAKt OfFp ONE Al ^ TJMt. THE NONPERS "VOU TAKE OFF" 
'*1UST ABB IrP TO THE ROLL. TOO UIlT JT REnOl"ING EvERT^ 
■^NJMJER fROh THt PtFARO. TOO LOSE EF TOO CaHNOT' 
■^RENOUE ALL N4fdBERS UII}1 TKE ROLL TflU HAVE." 



REABT TO PUrt* 



IKSTRUCTIOHE 

iKfOT 
IF R4 
IF Ri 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRlRT 

PR]4T 

PRfftT 

f Ft lift 

PRI^T "NEAE IS 

REM SET Of TNE 

FOR B=1 TO ? 

PNNT A; 

A^Bt^B 

NEIT B 

PILINT 

CiIHTCRNIHt]ti*1 5-*lNTCfU!DU?+ft*] ? 

P*INT "TOOR ROLL IS "pC 

1 = 

FOR !f>i TO f 

tcTtACJ^ 

NFiCT A 

R£lt CHECK FOR LOSS 

Ef C > T THEil fSO 

Ef C=T THER 1t2D 

FAR Ml TO f 

Fflft ;*1 TO ¥ 

FJIR n-1 TO 9 

FOR *f=1 TO 9 



THE BCARO: 
BOARIi 



IF 
EF 
'F 
IF 
IF 



N^L 
N»[t 

M=:L 



TNER 
THEN 
THEfl 
THEtf 
THEtt 



^0 
d40 



158 



5SI> IF L'H THEN ^54 

574 IF C-AtKl^Q Tlt£M &SD 

6ii if C-AfK^iAfH) THEH ^0 

d1l} IF C:-iiCK]-A(L}FA{Nh THEH ASi] 

dZD IF C-lirK]-A(n)-A{NJ IHEH AID 

d34 NEKT II 

^41} NEiCT n 

ASD NEKT L 

d&4 NEK7 K 

671? eora 9)9 

AM FOR X>=1 !□ 4 

7^0 MEET 1 

7te FRIHT "I QF HUHBEA^ TO REMOVE "; 

729 IHPUT E 

730 IF IBT(E) <> E THEH 74D 
?W LF C ^ I IKEV ?60 

7Se IF £>A THEH QBD 

7SS eOTD 7?0 

76« PfrCMT -AitSlfEG 1, 2, 3^ QR 4 iZ FDA THE BOnRPl" 

7&5 GOTO 710 

7?C fftlBT "UHflT IS m hUflBEft-J 

7He FOfl F=1 Id E 

7fC IHPU1 BtF) 

BOO IF ACIKFn O THEH S25 

Bl« PftlMT "fDll R£IICVE» IT lEFORE, mT ASAir," 

32^ GOTO 710 

a?^ HEJT f 

S30 IF i: O B4l1t-(if23t-[i{3)Ot4» THEH 870 

fl35 FDt F-1 TG E 

fl50 HEiT F 

SAO mo 410 

a70 ?R]HT 'THOSE NUHBERS OfSH'T liBD HP TO Y13tlfr RDLL, TRT ASAIH^ 



e» 
?oa 

?20 

9^ 



?70 



9?(i 
10(14 
1C14 
102» 

iCJe 

1044 
1C30 
1044 
1074 
ieG4 
I0?4 
TI04 
1114 
1124 
1130 
ir40 

ttso 

ItAO 

nao 

11?C 



DQTD 710 

PRINT *'TH£ HUMBECS IQJ lUVE iEFE TO REHQUE AftE: - 

FQfr B^l TD 9 

IF A(l]=« THEH 7^4 

fRINT A(|); 

NEXT I 

PRINT 

BDTD 710 

fRINT ■■SBimrT TflU LOST THIS TlHE." 

T"0 

FOR S=1 TO 9 

IF 4tBt*4 THEN 10OC 

T=T*^I 

HEKT B 

ffiiNT ■' THERE ARE -fTj- HUHBERS LEFT OH THE BORSlr 

fCltr X-a 10 9 

IF A{K]=0 THEM 10J0 

PRINT ACll 

HE IT X 

PRINT 

PRINT -IfAHT TA TRI dSAIH I1E3 OR M) 

INPUT &I 

TF QI-^^TEa- THEN 174 

IF G1 <^ "NO" TKEH 1070 

END 

PRINT 

PRIHT 

PRflfT 

P»rflT 

FSIHT 

[^FITT 

LF »(= 

IF tti 

EHB 



F 



* 4 

fOL 



CONQRATIUTiaHS 

HON *** 



* * +■ 



"PLnr lINDfHEA BAHE CTE9 Qfl 

H4 

"TES" THEH 170 

O 'HD" THEH I1A0 



H0>'| 
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TMinis 



Tennis is, as its name implies, a 
tennis maich In this game you have 
several opiions available to you as the 
position on the court that you wish to 
play from, the placement of your shot 
that you're trying for, and Ihe speed or 
type of shot. As in normal tennis, you 
don'taiways make the shot that you try 
tor-The program fetsyou pray, more or 
leas, at the intermedJaie level. II you 
think that it allows you to play too v^^ell 
ortoo poorly, you could always change 
some of the random factors that 
determine how often a shot is missed. 

Tennis was written by Victor 
Nahigian and David AhF. 



SERGEI TT?ET S 

^ERVE IS BAD 

SERVE IS GDCm..^ CM'1 I^TlfM IT!1 



^COHE 



9UCE 



SEPVEI TTPE^ S 

SERVt IS GODH,.. CW'T KETtPAN IT ■ ^ 



SCOftE 



AUD th 



-SESWEI TTPE^ S 
^EirVE IS 9AD 

fiEHL^E ftijfllEfn TYPET 5 

SEBl^E IS EA^.. ItOU^LE FAULT ■ 



SCOftE 



BUC£ 



fiUPl 



CREATIVE CDNFJJTINSt HDRRFSTDUff^ IfEV JCK3ET 



THERE AS£ SfUffifil, QM|On£ HVAUftBLi TO rOl AS U POSITIDHj 
PLADEiiEril or 5HDTt UND SPfEB CTrPEI flF SHOT. THE KEt THST 
TQt] UIU USE IS.** 

PffSlTilTN^fLACEflENTp TftQ^: L.BAChCQURT [1 );R.BACK' 
CflUftT:?]; L, FJJRtCDURT^Sl; fi, FBRECDUflTH)- 

SPE£» (TT1>E^ Qf SItQT: FAST-SlAH (S3 iSLOUlDB(L>, 
EA^KHAH]]^ ^Kf FS^EflAlfllS VILL HEKELT BE ASSUttED AS YiHJ 
SHOO? FRDK A CERTj^Eil SEI^TIDM DF THE COl|tT^ 

OR SERVES, TOU Ci*ll»CT MflVE FLftCEflEifT DFTIDNS, KT TOW 
tfCLl. BE A»L£ TO ALTEft THE 5FEES OF IT. E'f THE Ufl^, TDU 
UIU PE ALL1>UED TD ^ERl'E fEGET [M I^U GAUES. 
AFIE TOU READTT... HERE tfE. GD^ ■ ! 



5ERUE" TTPE^ S 

&EFrVE IS BAD 

SEPVE fll3fi3Kn TTPET S 

- SERVE ]£ BAQ... DQLIKU fAVI.T^ 

9C;0«E AlTD DUI 



SEFTUEl TTFE^ 3 

SERVE tiAS SEE41 RETURHE't... 

UttftT IS ^Ol^fi POElTieW?^ 1 
WIAT lyPE Of SHflT ARE IDU flAlilNG'^ L 
UHAT PART flf THE CBtJAT ftR£ TOU lilHINC FIJR"? 4 
rOUR RETURA IS SDQTft 
trtCE SHQT- THE COflPUIER CDULBN-^T E^ACH IT 



scrsn mtz 



SERVE" ITPE"^ S 

«ERVE IS tAIt 

SERVE AGAiH't T^PE"^ S 

StRVE IS FAH.., IfiUBLE fAULTi 



SERVE! TrPE? S 
S£R>JE 1^ BUEl 
SEAVE AGAIMM 
5EAVE IS 

5CDRE 



SEOFE 



AIH Qur 



TYPE^ S 
LQVETS 



SERifE- TVPE? S 




SEfiUE I£ MD 




SERVE AGAIti! 


I TYPtT 


LET SERVE... 


TAKE 1 


SERVE AGAII^' 


I TTPft 



SERVE IS 6E10II... CAA-^T RETUSK IJi 



BCQRE 



15 - 33 



SEfiifEi TTPE7 3 

SERVE IS GOOD... ACEi^ 

SCOflE »JCE 



3ESVE1 T'fPE^ S 

SERVE HAS BEEN AEIURHEII, . . 

WHAT IS "TOlfR PDSTTIOif?? 1 
iJHAT TrPE DF SHQT ARE TQU HAEIMG^ S 
WAt MET QF THE COUKt ARE TflU AlHItfG FOfi^ 3 
TQITA RETURU IS GDDII^ 
NICE SNOT- IKE CONFUTE R CO VLB If ^T REilCIf IT 



SERVE! TVP£» 

SERVE HAS 



BEEN RETURN EL... 



SCDRE 



ADD IH 



UHAT TS rotlft POSITJOM^? ^ 
WHAT TrPE OF SHOT ARE YUi: ttAKIHG^ 3 
tJHAT PART JIF THE COJJRT AAE T^tJ AIf4[H0 Fl^' 
VGUH RETQIrN IS OODUl 
CDNPUTER-^S RETORr^ IS GDOIl ! 



UHAT 
UHAT 
UNA I 



TS rOUft ^□SITION-'* [ 
TVPE flF SHOT AFrE fCHJ NABlIttG^ £ 
Pftsr thF THE CffURT flfiE fOlJ AIHJ**I3 fOfl^ 
TOUR flETURH IS GODfli 
CDflPGTER-'S RETORM IS GOCm " 



SERVED TYPE* 5 

SERVE IS 600P^,H CA2fn AETUR** IT! t 



SCDftE QANE 
- fiAHE OVfR — ■ 
S£l>fiE-0AME5 



T0U.,.i1t 
1 H 



Uhi^T IS VOVR ^QSCirON^^ 2 

IflEE Ttr-TOV UERE UNABLE TO FffiAtH THAI SHOT-COURI I 



SERVE^ T^PE* 

LET SEftUE*,,T^qKE 2 
5EPVE1 TT?ET S 

SERVE IS QOOli^^. CA«-~T RETURfl JT< 



SCORE 



15 ■ 3D 



SCUEE 



15 - t-OVF 



leo 




LIST 

1 PRINT 

Z PRINT 



lAGl]fl?'<TEHNI5 HATCH" 

T AE ( 1 3 r DRE ATI VE l^HPUT 1(15 ^ 



lORRISTDIfNt rfEU JCRSEl" 



10 

II 
22 
21 
24 
25 
3fi 
2? 
2B 
39 
3D 
31 
32 
35 
3^ 
IB 
3? 
41} 
4\ 
^2 
43 
44 
45 
Ai 
47 

^e 

4¥ 
5« 
51 
52 
53 
31 
55 
54 
5^ 
59 
59 
40 
A1 
42 
A3 
44 

4) 

4& 
47 
49 
4? 
75 
^1 
72 
73 

7i 

75 



"UILL BE AUI^VED 
TftBn05;'flRE TOU 



A4t 



SEfiVEP 

IF AIO'T" 

THCN S2 



TYPE"? 



PRIMT 

I'RIMT 
fRIHT 
PRIHT 
PRINT 
PRINT 
PRINT 
PfiINT 
PSINT 
PHINT 
T^J 

z=a 

PFel*fT- 
FRi**r 

FRIHT 

INPUT 
A-1i>04RN 
IF "''L 

[J=51 

If fl<C THEN Sa 

IF fl<[J THEN 70 

PRIHI rflBllOJl-StRVC IS 

BflTD 55 

PRINT TAB(1(I3;"LET 3ERUE..,T#ffE ?" 

DDTD it 

C=l 

B>^ 

QOTQ 44 

PEiNT TAB<H]];"SERUE rtHliTHi I TTPt" 

IMPtJT H»: [F BtO'^L" AN[I B40"S'' IHH 

EM0O*SNDn^ 

[f Bt^"L" THErt 47 

Q»S 

tf±4l 

IF E<Q THFV 41 

IF r<H THEJI 70 
MIItT TABM5}| 
BDTO UO 

fRIWT TABUOJ;"L£T ^EfitfF,,-, TAKE t' 
eOTO 55 

GaT04T 

1=100 * RflBfll 

IF Pi THEN 74 

?RINT TABCIll);*SEl!UE IS GDQQ.^. ACE< 
QCTO 123 
K=tDOfllHB M] 

ir 4*=""L" THtN ai 



TDU AS 
SHOT, 



TO Foairiflttt^ 

TIE ILEIf ThAT 



FR[*l7;PffIllTlfRm 

PRIHT "THEftE ARE SEVERAL OPTIONS AVAIJ_4flLE TD 
"PLA£EnE411 Of £l^T^ ANH SPEED ^TTPEl Of 
*V[J|] UILL LSE IS,.,- 

TflB<5]"PJ15I7rJl«CPLJlCENEIlT, TOQl: L.BACKJlQBRTinjIl.BrtCH-- 
'■Cl^^]HTi^^! L, FORECOURT C3}; ft. FlfRtCQUfiTcO." 
TflB(5J'"SPEEB iTVPEf OP fiWOTt FAST-SLAHiSJ JELBULQBCLJ -" 
TAB4 3r'»Atr:HA^Ii<^ fiND FiIREkAHBS UILL HEHELT BE ASSUt^ED AS 
-SHDOT FRfin i\ CERTAIN SECTil^N DF THE COO^r." 
TAB{5} "ON SERVES, YOU CANNOT NAVE PLj^CEMEI^T OPTIOHS^ JUl 
''UlLE. K AHi TQ ALTER THE SFEEIl Of IT, IT THE UA1» fOV'' 
10 SERV£ FIRST IN ALL QANEB." 
RfABT**.- HERE HE SfliH- 



iW 



SOU" 



THEH PRINT 



'S^"l flOTO 40 



PBIHT *^L' W S "i flOTO 33 



-SERVE IS Bfll.-. BOUBLF FAHLTI'^ 



7ft 
77 
7B 

7? 

Ba 

Sf 
B2 

e5 

B7 



If B*^-L" THEN as 

il=41 

IF K<H TNEH 95 

PREHT TABfiah; " 

60 rO 126 

GOTO 7B 



SEJtUE 12 GOOO..-^ UM'l HETURH IT M ■ 



Pft»T 
PRIrtl 
e=[HT 
FREHT 
II4PUT 



TABMO):"aERV£ HAS BEEH RETURHEO,,, 



?0 

?l 
92 
93 
94 

95 
9fr 
97 
?B 

9T 
100 

lot 

103 
104 

105 
104 
107 
10B 
10? 
ItO 
1FI 
112 
113 
114 
115 
It* 
117 
11B 
1H 
120 
121 

1^: 

123 
124 

125 

127 

126 

129 

130 

131 

13J 

134 

135 

14 

137 

Tie 

139 
14C 
141 
142 
143 
144 
145 
144 
147 
14S 
14* 
ISO 
1S1 
13! 
153 
154 
soft 
3 to 
2!i> 
230 
340 
2ii 
350 
3S1 
?40 
Zi3 
270 
300 
^10 
320 
310 
400 
500 



TABC20);"idKAT 



PART OF THE CfltJRT ARE IDtJ A|Me46 l^OR"; 



C4*RND(IM4l 

lAB4fOt;"UKA3 IS TClUlf PI16IT10H?"; 

IF OtO-3 THEJi 124 

FREttT TAB4 20);"iJhUT TTPE OF &IIOT ARE "^OU HAIiJnO" 
IIIPUT Cl 
PJ^EHT 
IflPOT R 
S=1C04RNBn3 
If Cf L" THEN ?9 
IF S<01 THEN m? 
GOTO lOCi 
If 3<ll THEN 107 

U=4*ftNDn? 

PRINT TABC30];'-iail)r dETUAN IS BAB.,.'' 

IF U<2 THEN 305 

PRINT TABC333;'HIT [HIT-SF-tOUHR" 

eOTO 130 

PRINT TftBC33)rh!T IHTO HEI" 

SDTO 130 

PRINT TAB(303;"tOllB BETUflH IS BOUDl- 

AI^[flTC44RNDa3) 

IF R+A1-S THEK 12; 

U^IOOtRNICII 

IF Ci«"L" THElf 112 

IF U^S4 TNEH 122 

QDTQ 111 

TF U<Q4 TNEH 122 

[:i^4+RetBn) 

PRINT TABC30];"C:[inPUTE*:'S RETURN IS IriD" 

IF B^2 THEN 120 

PRINT TAB[33]t*MtT QUT-OF-BOUHBS* 

GOTO 12B 

PRINT tABC333;"Hn JHTO MT" 

GOTO I2B 

PRINT TAB[30]rC0nrilTEFr-5 RETURN 13 OOOBf 

eoTO Si 

PRINT " NIDE TSf-rOO UEfiE UrfASLE TO REACH THAT SHOT-DOURT tl"D 

BorO 1^0 

PRINT " NICE 9HDT- THE COM't^IER CDIJLIJH^T KEACI^ IT" 

T^r^l 
BOTO 131 
2^1+ f 

PnCMTqCOSUB 200 
Pfllrtf T"Afrn5];"Si:flftE "st 
IF T>="4 liNB T>Zt-| IHEN 13^ 
If Z>=4 ANB i>T+( THEM (35 
QOTD 30 
^t-Yl4l 

eOTO 140 
21=11^1 

PRIKT" ^..... GflflE 

PftriTT TABM3>;"SC0RE-6AHES 
PRINT TAB(325;T1;* ";ZS 
If Yl>-i AHB T1>11*> THEN 1*4 
IF Zl>*4 AHS I1>THt THtH 14? 
GOTO 35 
PRU" 

?RHT -*****COHQRATULATIBHS..^rQU UOUf^^r*' 
SGTD 151 
PRIH 

fRllfl -t^lMAS PfiEDICTEOp THE COhfUTEfl IS AGAlH TR]UW*KflHTi+«4f 
PfflflT 

fR|i#T" rn IIHE TO fLAT rOJ AOA[N fiOH£TIHE^ ftl BJ6HT NflU, I" 
PREHT -HAVE TO REST, . ^ . ^ . ^« . BtEL 
PREHT 
IF r>^2 AHB iy^2 THEN 300 



QVEFT *" 



t' 



IF V=l OR 1=4 THCI* S*="SflflE": GOTO IflO 

IF r*l> THtfl ""*LOV£- 

IF ■f=1 THffl rt'-15 - " 

IF t^l TH£H ¥i^-30 - " 

IF T"^ THEfl T*='-40 - '* 

IF 1=0 THtfl Z*="Uiyt" 

IF 2<1 THEN 74i*<1S" 

IF 1=2 THfN Z<="30" 

[F ?=i TH£« Zt-MO" 

Sf>fltZ>!OOTO 400 

IF f^Z THfN Si="0UCE":l3OTO 400 

IF I^Z+I THEN 3t>*AlD IH "I QQtD 4O0 

IF T=Z-1 THEN S4='ABI] OUT": CDTD 400 

IF | = Z+2 OR Z-|f2 THEN 5a=-6ifl£' 

RETlJfrH 

END 
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¥icKer«ape 




LIST 

i PIUtT TH{30h;-C»fflTlv£ CWlPUSlffl- 

7 PP]IIT TftBIIS?;-llD*!F(lSHJllH, hEII JEPBEV- 

1 Pfi:nT:PF!itfi:fi!iif; 
r» inPUT At:B(lSLJI 10 

21 i=diaciii]&i<ii»,rt,i]i 

3e ^F P>9S THE" *? 
33 IF »<iS TbEH «> 

37 GBIO ft 

•t IF 1>97 OR J<4B TIIEiT 47 

'3 »>B-S« 

4$ SDIO ?a 

ia m s-i TO fi-1 i-5[BC(,& aehexi s 

a» FDr S'f ID ^:IIF4Ti 4rPlflllI Clllltlll):illE]I £ 

i3 PRII.T CnBKAJjiRtaTOTLE 

7D KEIT ■ 

7S enauit £i}:£ir[i 

Sfl FITF Jl<1 TD JDEPftlKT CI4R:I C Cl ; iHEKT K 

fO BEIUItH 

110 MTB UH2S4,»f9,',?a4.2SS.l37fl37,l37.1l8,12a,12?.l7?.T3P.1W 

IJC ft*T4 !H. 121,1??. 139, l2i,3SS,l31jl37, 137, 137 ,Jai,»,9, 9,1 

13tt MTfl 1?ft.l7?,l!?,m.2<i,?5^,B,fl,E,?i5.1?9,l^fl,2S5.11*,12? 

nif &ATA fi.l?B.IJ?,lZ7,lp5"rB,!6,3»,1?3,2«.12fl,l2S,l2B,l2e 

150 MT* :W,2,l2,?,?S5,3ai,7,SC.S<,755,i;4,l!»,l??^l2fl,|J4 

liD l*Tft !H.».?,?,fi.l2ft,l7f,lil,85tl'0 

1?0 l*Tfl 2H,?a,41,73tl34,li<T'3'>l^^tlJ'p"l3i>pU351p1." 

ItO I6TI1 l?7,l?B,1?fi,l2B,l27,ii,»a,l92.*i,fl3,l27,l29,ll2,l?8,l!7 

Jia 1^14 H:,3A,2l»3d,lfa,3,«.7<B,1,J,l«3,Ul,r4S,l37|l35 

J JO »*TA D pO, 0, 0, «,l2i, 1 11,137, 133, 12*, 132,1 30, 2K, 126. l2B,lfl1,ld1, 143 

230 0»Ta 137,IJ*,4i,(37,lJ?,l37,IIB,IJ.Hi,IJ7,2H5.l3S,tQ?,l37,l3?.l37 

341> frATA 74H,r2i,l3J.li7,l37,U4,l,1,34?,S,2,lTS,l37,l37,l37,IIB 

29l> OikU 7D. 137,117, 137. ^;t 

□i; 
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This program Inpuls a line of 
characlers from a Teletype, and then 
punches the shape of each letter on 
jjaper lape. This program can handle 
all of the letters and numbers and the 
space, but there is no reason why it 
could not be modi Ned to handle 
various symboTs also- 

The operation of this program is 
fairly straightforward. After each 
character is converted to a number 
equlvafent to its place m the alphabet 
(A=l, B=2. Z=26, space=27), a simple 
table look-up Is performed to find the 
correct numbers to punch onto the 
tape. These numbers are stored in the 
DATA stalements. 

The original program was designed 
for a PDP-S; the one here runs in 
Microsoft Basic, however it would not 
be difficult to modify the program for 
vi rtu a I ly any Basic-speak i ng c cm p uter. 

Written by Bill Gardner and Jim 
Larus, Tickertape first appeared in 
Creative Computing, May/Jun 1977. 
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TV Plot 



This program automatically devises 
pfots for television shows or series 
guaranreed to appeal to the masses 
and win high Nielsen ratings- By 
$ub&lltgtlng appropriate wQi^ds in the 
variouspartsoftheprogramjtcouldba 
easily modified for many other ysefuf 
purposes such as devising names for 
new breakfast cereaJs, preparing PhD 
theses, or naming government agen- 
cies and their corresponding projects. 

This program was originally written 
in FOCAL by Mary Cole and converted 
to BASIC by David Ahl. 



Siflf 



rvpLor 

CREATUF CDflPuTLa 



TKIS PPrH?*^n ^-IT"D*lflTICAaT CWES UP \^Wi TEi-E^^lSIMI 
an DUG GlJA*ftriTE£t TC ftPPtHL tQ tH£ ttftSSES iU» UlK 
HI£N NEIL^EN FtATEHES. 

HEfr£ li JK riUST FLQTt 

TIIF S?Ef:[ilL 13 f^BQtlT li tilLAITIOOS LAllVfE MO IS A IMIZ AT 
SUL^IffJS [TRIJfES ANB UHD STDPfi THE FLDDD. 



AHDrHER (rES DH HII^T ^CS 

THE PEOBEAH LB ABDUT A TdtUffiHTFth- {IGLllE UhD IB 4 FLOF AT 



THE FRCBRAII IS ftBflUT A 5£NSJTIiJE SECRET ABfflT UHC 13 A UttIZ AT 



flJrntJfEfi CTF8 Of ND?' T£a 

TKE SPELl^ IS APDUT A DEHICATEII LITTLE Nt UhfO IS A FIDP |4T 
CADEIJ^Q HLALTU fQllB AHU UNH HELPS THE DDE* 



iHOTHEfi ^TtS 



ND^T TES 



THE SEftECS ]& ABWT A KE^ERIHG Li^lfTElT hfHQ 19 A UHlZ AT 
PER[^TIIfi ELEPHAttTS AMD UHD ?TOP£ TH{ aDdt. 



AiOTHtft irES flJf *fD5^ lES 

THE SPiCJlL [5 flBtIT A NENFECKED LAUYEFC UHQ IS f| fLOF Al 
F3lj4<TIfle FIRES Attt I^HD DESTRSrS Th£ CUT^ 



AMOTMEP fTES W m)^ fES 

Tijf JTeHf 13 AADJT A SEHBITIME GIRL CDUHANIi U^fD II A FLDP AT 
SOLVING CIIHES AhB IfHD ftEtHvE^S TH£ JfifELS. 



AtDTBER (fES OR HO^-^ »□ 

fl^H^ flQPE TDU HAVE A SUCCESSFUL Tl^ 9itDU M 
01. 



LL9T 

10 PRI«T TflKJ4];-TVFLDr' 

30 PPI*r TArC2J3;"CJIErtTli/E C r^HPIJT j |f ij - 

40 PRINT 1*1(1 ?i;"HORRISTJ}JJ^p MiU JERSEY'* 

50 PCmrPtlNTsFRIHT 

55 nt^i -THrs Pfl&6fiAn AuTonnTiCALLr Jidnes up ujth televisthw 

iO Pftlftr '5HDUS 6JASAMTPE& t& Ai^PE^L ID THE MflSSEB AHS UIH'" 
;0 ?lll*T -HIOH HEILSErt FCfiT|NBS.":F«IilT 
BO fRm "HERE rs THE rrffST PWI;" 
pi!lMJ:8(r5DB fl04 

Bl! K flCTD 1?0pl30Tl^flpl5a*liDp15o,lJarHt.1^i3,lH 
Ai=''PtDGf[ilH"i8l?T0 \?\y 

J^t'^RtfQRT^rGDTD 1?C 

fl*="SP£ClilL"lE(lT"D 1?0 

At-'^SEflESVaDTD ]?0 

fl1""JTCRl"" 
MS^^ SDO 

OJI I GOTO T¥i>,2Mp2l&jJ30Ha30p24fl,J5O.?S0.:7t-280 

^■■"awiNGirre'^tGUTD ?¥i} 

Bi»'B»U_LlAHI':6DTfl 2!J 

Bli'aALTr";GOTQ 29l> 

B*--ttJLAIl]flUriHIT(l 2¥D 

B<--SEHS[J[yC--EDTO 2?D 

Bt^'-EnjilE-ERIHS-iGa^O 2?1| 

B<^-*fENPECHEIr-ceOTa 2^ 

M--IlEBItflTEIf"[HITa 2W 

•t -^ " Ttf Dtf SH Tf IH. ' ;6DT0 J^O 

QDSJe fiOI^ 

DN JL eOTff 3l0p]?ih,33OpJ4ffj35l>H34*^3?5,Ja0,3?0,*OD 
rt«"eiRL COlJHAtfliVGDTD HO 
i:»="LITTLE Sflr[6DrD 4113 

j:»-"5CiEHrEaT':E0Tn 4iff 

j:»="LAUrEP':GDTn 4W 

Ci=c"T0lrN ^ARSNALL":BOrO 4J0 

C|k*DEIir[aT'':tDTQ 41Q 

Ct=*tllS CSfVER-ilMTC] 41C 

C1=\^UH1>LE HilK'rEaTD 4t0 

0>^' SECRET AfiEHr^;GOT0 AH 

CI^'CDLLIE" 

EDSU£ SOD 

ON X GOTO 430>44r^5&,4£0,470p430^44C^4^0t44i3p4^0 

A U)fIZ":fl[?TQ 4flD 

A FLQP":eDia ^ai} 

HEDIDCflE'-rGQTD AA<\ 

5ifi:;E5E"cQOTa 4^l> 
A D1&AS7ER- 



100 
IrD 
IIP 
130 
140 

144 
T?CI 

I to 

1?0 
200 
?]0 
?10 
230 
?^0 
210 
240 
J?0 
311^ 
2tD 
14D 
3TD 
3 2D 
3J1) 
340 
3S0 
34 [h 
370 
JBO 

400 
410 
420 
43P 
44fi 
H50 
4fiO 
^7D 
4B0 
An 
5DD 

atB 

530 

5ifl 
SSi] 
5^0 
SJO 
5S0 
3^0 
400 
410 
i?0 
±10 
440 
4S0 
£40 
^70 
£G0 
4?0 
?P0 
71 & 
72D 
73» 
71 D 
?5I> 

7ta 



Dk 



MT D 5D0 p 51 0,570 ^330^ 5^0 h SSC h 540 1 5 ?0 , 580 ,59 E 



40C 



GDSU 

OH K 

E*=' 

El' 

E*>' 

£*=■ 

£1^ 

£!■■ 

Et=' 

tl'' 

El ^ "MER D [Jl G f L EPHAH TS ■■ t O^TQ 

Elr-4r[NffrHt RACE9^:GaTJ] 6I>0 

GOSUB fll^O 

DM t GOTO *:c}f4JI|,i40,fi50piidDpi70^iflSpd?0,?QO,^l( 

Ff fl£COVERS THE JEUELS-:GOTD ?20 

"i'fOtlE THE 5PIES":GDTn ?3D 

F* = 'D£STIlCfS THE CTir-^GOTO 720 

F*^*fIHDS LDVE';bOTO ?3D 

F*^"Sfty£S THE ANlAflt$*'lG(?T0 ^16 

F«°-[JHfEi5ES":0DTD 720 

THE SfCRET-'iGnrD 7J0 

FLJIDD"S6DTa 720 

BO&'SGDTO 720 

SACRIFICE" 

DHG :5 ";j;*;" 



soj-^iHs cfi^HEf^ioaia 

BOf Iffg CDUS"f^TO ^00 
I^OOKIHG HEALTH FOGH^OOTQ 
PlTGHIHe llOD''tO0TD 400 
FRSr^CTIHG ECDLDBT'^rflDTfl 4 pa 
HELPIJtG CHILDREN "^QOTQ h(W 
Tbfl-fl^TEP DPiirKlire'tGnTI] iOO 
FrQHTIMO FIRES":GaiQ ^QO 



1*;" IS flfiOUT A ""Et;- ■■:!;*; 



Ft--IIISCDl'ERS 

F? = *STDP£ S"HE 

F*«-HfLPS THE 

Ftt-^fl^KEJ THE 

PRlfll "THE 

PRlKT E*^' frHH UHD ^iFi".-jPRI»fTTPRINT 

IHPlTT "flHDTHEfi IT£E UR RDr';A1 

IF fll£"Hfl" THErt ¥f? 

GDTO 100 

J^tHI n D^JWII Li JtI }:RETURH 

FRJHTiFftlttT -C,*". WflPt rot HIiVE ri StJCCESSFHL J^ Sm?l^"-:E^ 
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fwonky 



RUH 



The compuler wjII s&I up a 15x16 pf^ying flefd in which 
you are randomly located. Also inside the lield is an 
objeclive square. 30 blocrked s<^^Jares (wallsl. 22 relocation 
squares, and ] super special new mazs square, and, of 
course, the Twonky (which is no relation lo a ere me-fi lied 
CLjpcake)- 

To win Ihe game, you must reach the ob|&ctive square 
before the Twonkygels you, by moving one square at a time, 
forward, backward, right or Jelt Unfortunately, you are 
hindered by several things. 

RELOCATION squares, when moved on. cause you to be 
randomly transported to another position in the maze. 

WALLS: you can't move mto these squares, and lose your 
turn when you hit one. 

SUPER^MAZE-SQUARE. essenilafly an instant loss. 
si nee when you move he re a completely new ma^e Is set up. 

TWONKV; after every inover the Twonky moves Toward 
you. [He is impervious lo all traps, even walls] When he 
gels too cJoso to you {2 or fewer squares), you lose- 
However, you are equipped with a de-matenallzing ray gun. 
You have Ihe option ol using ihcson your turn. If you hlf the 
Twonky he de- mater igJizes and then re-malenallzes on a 
different square of the maze lo resume his quest after you. 
(CAUTION: he could be dropped inio your laplK 

After each move pair (you and TwonkyK your distance 
from both the Tvifl^nky and Ihe objectrve square are printed 
There is no board prinlout — you play blind. However, using 
the distances, you can home in tothe approximate position 
of both Twonky and objective. 

When shooting at the Twonky^ you do not have a shot If 
the distance he is from you is not an integer For example: If 
the Twonky Is 2-23606 units away, you don't have a direct 
shot If he is 4 units away, you do have a shot. Exceptions lo 
thfs rule are distances of 5, 10, 13^ and 17. (A review of Ihe 
Pythagorean Theorem will show why this Is true } Hence, if 
the distance is 5, 10, or 13 [but not ITKyou may or may not 
have a direct shot- Likewise, lh>sset of rules applies lo the 
direction of the objective 

If you waich your distances before and afler moving, you 

shouJdbeable to le II where the Twonky IS in relation Jo ygux 
e-s , forward and to the right, or backward and to the left. 

Take the distance you are from the Twonky, square it say 

2 23606^ = 4.99999S approx. = 5. Then find two Fntegers 

that when squared and added together equal Ihks {Zand 1). 

UlheTwonky is forward and to the right you now know that 
he IS either up 2, over 1 . or up 1 , over 2. 

The thing Ihat makes Twonky unique. Is that at can be 
played on two levels, one mwhlch you play for fun^ moving 
haphazardly; or you can play while figuring out exaci 
positions, and calculating moves m advance for a challeng- 
ing (as vifflll as fun) game^ 

Twonky was written by Mark Capel la and first appeared In 
Creative C(?mpi/lfng, May/Jun 1977, 



lUflNKr 
HJ^ftftLETlIiJJ^ }(£U JERSfT 



■fOU UAIfT £HS TRUE 1 1 DNS (T/Kh? T 



YaU HA^E LANDEH Qit THE PLANET DF? ^UlHKt ^MB 
ITS KI^IS 1Ka«S:THf[|t i;[N& IS KINO Kfl«G] Hi\S 
CAPTUREB VOU* Sit HAS PUT fflU lit A Hj^Jf THIit 
1J 1 }i U^inS LCH6. TDlJ ARE IM THf HARK ^m 
3tE**. fOl MUST GET tfl Tn£ OBJECTIVE SIlUARE 
BE SET fR£E. 



CANMflT 



sauAsrEs T«flT 

a^iRfTES THAT 

SyUAI^E THAT SETS \JP A 

MASTER CfllLED THD«Kf 

AiSOfrB tOU IF THE 

BELOU 2 irKITS. 

TUa«KT IS AUO iBflJJNE 



[NCLUHE: 

TOU CAJfNDT SA INTO Oi?], 

RflHDQflU THRIU fOU flfiOUHB THE MAZE {22)^ 

fi^ MAZE AND AU THAT'S ]il IT M^ 
THAT CHASES IQU AMD ViLL 
IHSTA«C£ EI ES facfl tw FALLS 



to AIL TJ^AfB IIJCLUDIMS 



mtl DAV: 

rtlWE DNE SO UA RE AT A TIME TO FIND THE OBJECT I HE 

ik ESCAPE FROM TMf Ti^GMKI. 
SJIOOT AT THE TUEIMKT DNE SIRECTICH AT A TlMt. 

IF THE TUQN^r IS HiTt Ht ViLL hi REPLACE]} IH THE 
JfAZE flANDDHU, 

If THE nfONlTT AB9IIR7S TOEJ.-.rOU LflSE^ 
IF TDU J. ANT) DtC THE DSJECTt^E S^ARE TDU UIN> 

OCDS lUCEt 



TNE TVONKT IS B.OA22^ UNITS AUAf^ 

TIE OBJEGTJVE IS ?.4&JBJ UNITS AUAt. 



flCVE Dff SHOOT {H/5^^ N 

uh[j:h uat ^Fi^Bh" If /!.?'* f 

HflVf ALLiJVEO. 



THE lUONNT 15 
THE DSJECTl'JE 

TUDVKT NQVES.. 

THE TUa^KT IB 
TK£ 0(J£l^TIVE 



7, Jill VNITS flUftr- 
IS S.SlWT 1JMIT5 AlWt- 



d«7^21 UJflTS AUAT. 
IS S.5^i31 UIIIT5 i^UAr. 



ttffVE DR SNDOT Cft^SJ* ft 
UMCH UAT (F/ff/H/L)T H 
MOVE ALLOVCB. 



Ti<£ niQWKt LS 
THE OtJECTIVE 



?-2JT! units ACIAT. 
19 G«9M28 UHITS AUAY. 



TUONKt MD>JEa.„. 



THE TifQiilkt IB 
THe DBJECTIl^E 



IS l,?442B UNITS AUAT. 
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HDiJE ALLQUtD. 

TftE DBJECTItfE 1^ B-SWOl UNITS fllW^. 

THE TUJfNKr IS d,fl82?6 UfllTS AUftT. 

IftE DBJECTIliE ta 8.5^^01 UNITS A^U 



MDl^E OJr SNODT [fl/SI^ II 

HDVE AILOUED. 

TtfE lUiTNKT 13 5.(i99D2 tWI"ra AUST, 
THE DEJECTIilE 13 7-4J3?7 UNITS rtilriV- 

TUBNJtT H0II13,„. 

fK TDflHKY IS 5 UNITS AUdf^ 

TilC OIJEGTlVC IS 7.41^/7 UfllTg AUAI, 



HAVE Dfi SJlUflT ^^/3]T S 

UilJCH HftV Cf/B/R/L3^ f 

Z A P --? A P —2 A P — ? fl P — W_l^T^H| 

Tdl^ HIT UAU. 

SilOT NISS^Bh 

TIE TUeHKY IS ; UHITa AUAT. 

THf U»JECTIli£ IS 7,4137? UHlTS *U*T. 

tUUNKT NDVES..,, 

m TUQNKr 15 4 UNITS AUAV . 

THE OBJECTIUE IS 7^*13?? UHITS AUAY. 



tlNli;if UAT [F/B/R/Ll^ 1 

Z li P -Z ft P —Z fc P — I fl P --Z A P "^ ft p — Z fl P — FlZZLf. 

SHOT LEFT rtlilE- 
^UUI AiSSU. 

TBE nfOffHT IS 4 UMLTS AUAV. 

THE QBJfCrCliE IS ?, 61577 UtflTS ftUflf, 

TDDHNT IU]V£a.... 

THE Tt^DilKT ES J UHITJ 4IIIAT, 

THE OBJECTTyt IS ?*415?7 UFC1T3 rtUAY. 



rtflVE <]R EHUDT <«/&)? S 
UNICH HAT (F/B/ft7L3^ It 
2 A F --I ft P --FIZZLE, .- 
SHDT lEFT AA2E. 
^HOT fflS^ED. 

TNE TUJ]HKf IS 3 UHET^ AUflY^ 

TNE DfJECIIVt IB 7^61577 UNITS AUAY. 

TUDHKT nOVfS 

IftE TUDIIKT IS 2 JNITS AUflV^ 

THE DlJECTIVE J£ 7,&1377 UNITS rtUAY. 



ni>VE oil SHOUT (A/S»T 9 

UrtlCrt UAf <F^B/ft/Lh^ J_ 

Z A P --I fl P "Z ft P --1 ft P "ftLASTuE 

TDU illT UALJ-. 

SftOT HiaSES. 

THE TUJlllKT 19 2 UFflTS AUflY. 

THE DEJIGTIUE 15 7.i}i77 UNIT^ rtUAY, 

THE TUDMKI IS I UHJTS AUi^tr. 

THt QSJECTIVE U 7.^1577 UNITS AUAY, 



y > > SCKLDORP "M < < < 

TilE rUGJIhT JUSE ABBQRBES YOU Jk ri3U LOBE1 



LIST 

to PRIHT TABC2^);-TtfGrfKT" 

50 PRINT TABIEBJ; "CREATIVE C&HPIfTINfl'' 

30 PRINT TABU^^;-nt]RRI3TDUH UEU JEffgEI 

40 PRIHJtFffI«T:?GINT 

140 ijQSUB 2^^i 

Hlfl UnSpfS) 

LET 119^0 

GO SUA ISJO 

PRINT ^' 

PBINT 

SOSUB 143l> 

PRINT 

PRINT '^HOI/E DV SHBOT {M/HJ**; 

INPUT Qfll 

IF QB1""M" THEH 

IF [I9$ = "S" THE^ 

BOTD 210 

fRIJlT -IfflJCH UflT 

INPUT Ui 

iHCn 340 
THEfl 3^11 
TWEff 400 
ThEir 4 JO 



150 
lAO 
170 
IBO 
1^0 

2ZQ 
?30 

2:io 

370 
2S0 
2^0 
300 
310 
3It 

340 
3 SO 

3 AD 

3JQ 

J?ft 

4 DO 
110 
4?l> 
430 

440 
450 
4J0 
4J1I 
4S0 
4fO 
300 
510 
5Z0 
930 
S40 
310 
S&O 
570 

a^o 

5»0 

^00 

dIO 
i?0 
430 
440 
4^0 

«;« 



270 
?50 



iF^B/ft/Lrf 



TfiY ASftlH cr/ll»7 H 



696 
700 

710 
720 
710 
740 

7S0 
7A0 
7?0 
7S0 
7?0 

aoo 
aiD 
s^o 
a^o 
ato 

flSO 



IF Ot-"F" 

If fft="B" 

If (i*"L" 

IF 8*:^"fr" 

SOTO 210 

LET 'A^^X 

LET T5»T-fc 

BflTQ 4dO 

LET X3=S 

LET T3=T-H 

QDTO 440 

LET X5=K-1 

LET TS-r 

GO to -440 

LET ]f5=K-H 

LET T5"Y 

GOTQ 440 

IF I5<1 ThEW 3Ta 

If KS>15 THEH S10 

IF f5<t THEN S10 

Tf T3;>T3 THEH 510 

eOTO 340 

PftiMT 'THAT HDiJE TARES TOD OUT OF THE HAZf," 

FHIMT "NOVE HOT ALLDUEH.- 

SOTO Udi] 

Dif lAIXS^TSh^n GOTO 534 ^420 p 430 ^4^0, 740, BOO j?Za 
Un M* EJIFTT SPACE 

LET ACKpl-J-O 
LET ACX5pT3)^1 

LET x=i;s 

LET ■r=T5 

PRINT "HQVE ALLQUEII,'' 

eOTQ 1430 

REM 4*« IrfPQSSIBLE T[} QET HEftE 

REH *» BLQCKEB SPACE flE)HTIRE. 

PRIH7 ""THAT SPACE IS BLDCKEB^" 

SOTO 1430 

REM *** RElOtATIDlf ROUTIHE. 

PAJMT -TDU VE BEER R E L il C A T E I M" 

S05UB ?7l0 

IF ACZ^Uh>2 THEH 340 

IF flCZ^Bl THtif iSO 

LET ACZpU3*| 

LET A(J|pT>-0 

LET X=Z 

LET Y"ll 

QQTJ] 14^0 

RE*i <*+ CHAMEE AU^ SUPER TRAP. 

PRINT ' rOIJ HIT IHE SUPER TRAPU YOU GET A HEU lUZE 

SOSUB 1830 

coro 14J0 

Rin 4tf HE HON J 

J' Km 

PFtlHT 'I IIOR'T RELIEVE IT BUT TOU UON THE SAHET 
PRWT "TflU BOT TO THE 08JECTI« BEFORE" 
PJIIHT ■ THE IHOKHT SOT TDUM" 
PRIHT 



1G5 



Q7D 



B?0 
9 DO 
910 
*30 
■9 JO 

T50 

?60 

9?0 

?H4 

99D 

1^0 

1410 

1974 

1«0 

1«?D 

10?0 
1DSD 

1100 
lltD 
1170 

1130 
1140 
USO 
ItiO 
1t?0 
1164 
1I9S 
12013 
1210 
1220 
1Z30 
1?40 
1250 
1^60 
1??0 

ijao 

11?0 
1300 
1310 
1320 
1330 
T340 
T3Sl> 
13AI) 
t3?0 
1300 
T350 

1420 

i4je 

1U0 
1IS0 

us? 

1U0 

1*70 
14?0 
1300 

isia 

112 1> 

1550 
ISOO 
1570 
i^SO 

IJOO 

1*10 
1fi?0 
1A30 
1640 
1A50 
1A40 
1470 
t^SO 
lAfO 
t700 
1710 
1720 
1730 
17« 
1750 
17ie 
1770 
17S0 



1&0 
^750 



PRINT 

PtINT "IBT AGAIN CY/HJ' 

mPUT S) 

if E]*="T" THE* 

IF Ql=-N" JHEM 

GUTO 370 

f?EM *>* HE- LAHOeH ON TUDHItYri 

fRlJ*T "^OtJ STEPPEI QH THf TUUJWYf' 

flDTO 17f0 

BEH tt* SHOOT GOUTIrtE 

PPIflT '1*HICH UflT {F/Bn'R/Lr; 

INPUT Ql 

IF at="F'* TH£N 1030 

IF ^U**^*' THEN lOdO 

IF 0*="R" THEB n?0 

If fli^-L^ THEB 1090 

0070 210 

1.ET S1=0 

J. FT 32" -1 

BOTO 1140 

LET S1=0 

LET S2=l 

BDTQ 114CI 

LET B1*-1 

LET 52=0 

eottr 1140 

LET S1=1 
liJ S2±0 

ifT m^i 

LET R2iT 
LET B1-AW&1 

LET R2=R2*S2 
PRINT "Z A f --'; 

IF R) < 1 THEN 1240 

IF Rj y 15 THEH 1240 
IP RJ ^ ( TiCN 1340 
IF R2 > 15 THEfl t240 

90TQ izeo 

PPIHI "FIZZLE..." 

PRIHT "SKDT LEFT NAZE." 

PGIItT "SHQT nia^ED,'' 

SorO 3 430 

IF AfRt^RZh <>2 THEM ]3» 

PfllrtT "BLflSTIMh" 

PfflflT -TOU HIT JALL.' 

PaiflT ^SHQT ttlSSES." 

6010 1430 

IF AIR1,R2^ <> A ]\itn 1U0 

FRIfll ■ BtfCHIl- 

PRIM "TUOJIKi RETREATEE-'^ 

LET A (R1rR2r=R? 

BD9LI3 2730 



2+cvi-ri"3jn 



Y 



P 



IF ChCZ^U^ <> THEIt 3370 

LET AlZ^UI-fr 

LET JI^I 

LET Tl-U 

SflSLB 1450 

BOTO 1S70 

BCN *** PfilBilT TUOJIKT ANO OIJECTIVE PIBTAflCE 

PttlllT 

PREflT -THE TtlOttKT 

o-(Sfift(Aia{ai-K5 
PR [JIT o; 

PRIJfT ' EJIIIT9 AUAT.' 

PRINT ""THE 0BJEJ:T1IJ£ IS 

P1i(£ORiAfi5a2-X}'2+C'f2-T)^2ll 

PRIHT Stj 

PRINT ^ HHITS AHAV." 

PRIHT 

ITETUAN 

REH ^t TUOHHYS LJ]eiG 

JF Il<2 TRfEi 17?0 

LET IJ=T1 

LET Z1=S1 

TF K > HI 
IF T < T1 
LET Z2=T1tl 
OQTO 1719 
LET ZJ=TI-1 
GDTQ t710 
LET Z1 = K1H 
OQTO I7tl 
LET Z1"X3+1 
LET flCXtpTD^R? 

LET fr9»mzi>Z35 

LET ACZl,Z2»=i 

LET ll^ZI 

LET ri=Z2 

PftlilT "TOOIWY HOUES*..*" 

005UI 14S0 

IF J^-^ Z THEN 210 



THEH 
TJ^EH 



1700 



17¥0 
1000 
1810 
1S20 
1B30 
1^40 

laso 

1360 
1370 
1030 
1383 

lua 

1S?0 
18? J 

1073 
1?til 
l»ZO 
1730 
1*40 

ttso 

1V70 
IfSO 
H*0 
2000 

7010 
3020 
?030 
204i) 
7050 
2060 
2070 

?oeo 

20f0 
2100 

2110 
2TJ1I 
2tJ0 
2T4D 
;i50 
2160 
2170 
2100 
2190 

z:oo 

2210 
2220 
22iO 
2Z40 
2U0 
2110 
Z320 
3330 
2340 
2150 
23fl0 
2110 
2420 
2 1 JO 
3440 
2450 
2460 
247 & 
24B0 
2490 
2500 
2510 
2^20 
2510 
2^40 

nso 

;S60 
2570 
2190 
J400 
2610 
2620 
2630 
2640 
2645 
26 SO 
2660 
3670 
2fr30 
2frf0 
2700 
2710 
2720 
2730 
2740 
2750 



PRlHr 
PRINT 
PRINT 
BOTO 950 



"THE 



> ^CHLGDRP 
TUeiHET JJST 



AlSQfrOEO 



YOU 



TOU LOSE* 



^ET UP MEU HJ3ZE RDUTIHE 



*** 

*lP 

*** 
»** 

90^1 

ii^i TO as 

ACBO^Ol^aO 



I'PLATEJIr 2-&LOCKE8 SPACES 
J=JtELDi:AlI[]ilSp 4^SUPEFr TRAP 
5* OBJECTIVE^ 6=TUDHKT 
OiEtlPlr SPACES 
CLEAR HAZfc 
T& 15 



REn 

REH 

GEN 

HEtl 

AEfl 

REfi 

FOR 

FOR 

LET 

NEXT 8T 

NEXT BO 

FOR 1^1 TO 30 

GOSOB 2710 

IF AC2pU5 <> THEN 1920 

LET A4Z,U)>? 

MEXT I 

«EM 444 PLACE RELOCATIOns 

fQR 1=1 TO 22 

BQBU? 2710 

IF A{Z,U} <> TUEH 1^30 

LET ACJpif3-3 

NEXT I 

REN *•* M-ACE THE SPECIAL TlWP 

BOSUB 2710 

If ACZ^Uh <> THEti 2030 

LET ACZ^m=4 

REH >*« PLACE THE PLATEB 

ODSUS 2710 

IF AlZ^J] <> (\ THEM 2070 

LET ACZ^Ur-l 

LET 1=1 

LET r=u 

REH t44 PLACE THE OBJECTIVE 

eOSJ^B 2710 

IF fl(Z,l^^ O THErt 2130 

LET A(Z^U3=5 

LfT I2>Z 

LET I2-U 

ffEH 4+4 PLACE THE TUDHHT 

BD3US 2710 

IF A(7tU3 <> THEM 2t?0 

LET ACZplir-A 

LET XI =Z 

LET TJ=U 

RETURN 

BEH 

FR1HT *IU TDU IMNT IN3TrucTIDA9 CT/H^; 

INFUI 01 

If at="«- THEN 2700 

IF a i> "t" THEN 2310 

PRIHTtPALtrltPRINT 



■THIS 15 THE QAHE OF TUDHKT.- 
"TOU HAVE LANOEB OH TK PLflflEf OF TUlMfi ittD- 
'ITS KEHS <KOHe:THE^R KlNO 13 UIHG KDHG3 HA4 
"CAPTURES] VOO. HE HAS PUT TBU Iti A iA7f THAT 
^1) + 1^ 41HETS LONG, TDU ARE Ltf THE HARK AHD 
'SEE... TDU HUST BET TO THE OBJECTIVE SOUAAE 
*BE 5E^ FREE,* 



HAZARDS 
"SQUARES THAT 
"5BUA(rES IHAr 
"SOUAltE THAT SETS UP A 

"HOHSTEt CALLED TilOHKT 
ABSORB rw [F THE 

" BELQO 2 UnrS." 

TBONKT IS ALSO inOOHE 

UALLS^" 



PRINT 

PEIRT 

PBIHT 

PRIHT 

PRIHT 

PfflHT 

Pftlfll 

fRIMT 

PRIHT 

fRIHT 

PRINT 

PRINT 

PRIHT 

PRlttT 

PGJHT 

PllIttT 

PfrlHT 

FAIflt 

PRIHT 

PRIHT 

PRINT 

PRINT 

PRINT 

PEINI 

PRINr 

PRINT 

PRIHT 

PHIHT 

PfitUT 

fum 

RETURH 

«EH »M SUBROQTIHE TO GET 

LET Z = [HTCRHBin615+l) 

LET H>lHriRHB4n*1S+n 

RETURN 

ENi 



IS" 

CANrfOT"^ 

AHD" 



IHCLUK:" 

TOU CflHWJT 00 IttTQ 
EANItQHLf TKR3J,' TDU 



flRQUHB THE NAZE C22).- 
HEU HAZE AHB ALL THAT'S IN IT (1 T 
THAT CHASES TOO AHB U3LL " 
DISTAHCE ]T IS fftOH TOO FALLS'" 



TO ALL TAAP5 INCUIDIIB'* 



■HOVE 



TOU CAM:" 
ONE SOU ARE AT A TIHE TQ FIHS THE OBJECTIVE" 
OR ESCihPE FRDH THE TUOHM.' 

'SHOOT AT TNE TUDHKY OHE BIRECTIDH AE A TIHE,'' 
' IF THE lUttf^Kt IS HlTp HE UILL BE HEPLACE1 IN 

HAZE RAN BQttLT^ " 

^[F THE rJON*r"- AflSOftfl^! VOI}-..rM LOSE.* 

' IF 100 UNO OH TtlE OBJZCTi^E 5tUARE IDU Ul(*-*^ 

'SODB LVCHI" 



2 RAIfBDH HUHBERS 



THE' 



-¥en 



Two-lo-Ten Is a game of chance 

played wrth a special deck of cards with 
onJyihecards2-10 Thegamelsstmllar 
lo blackjack in that you are drawing 
cards and trying (o come as close as 
possible to a goal number [chosen at 
random before each round) without 
going over it Vou musT com^ within a 
certain number of points of the goal 
number determined by a "lucky-JImlt" 
card The catch to the game is that you 
are not gjven The oxact value of The goal 
number bul rather a clue that is only 
within T5% of the goal. 

Can you think oi a way to make Two- 
to-Ten more Interesting? Perhaps play- 
ing II against the computer as an 
opponent? 

Two-to-Ten appeared In Creative 
Computing, No^/Dec 1976. 






TErf 



lEtf. THAT MA^f TOPIES fflQIf TrtE 
THEfTE AftE NO fflCE CflftDS - DilLT 
£A9T |44E FUN TO PUT EF TQU 
SO HEAV THE INSTRUCTIONS 

KT I^ UlN«lNfl. TffE IH Aitr 
flCK A RAtrDETIl ttJH&£R 
DF flQfiE CH^fllin CVDSEN, 
GCrriNiS TQ F^T KOHBEff 
AM ALLQUAMCE CAED. THE OBJECT OF 
TOTAI. Of CAMS UTTbtJif THE MYSFtftT 



UELJ:Dft£ TO Ui 6AHE Of TvO TO 
SPEtJAL ^BCCK OF CAIBS^ UStD* 
THE CA«BS 2-IC. THIS GAflF IS 
LljrBEASTAi^B UHflT THU ARE HDIN^ 
CAI^EFJE-LT. 

fli TH£ ST^JIJ OF IK£ EAHEp TDif 
MUHEE^ BEt4fEEM tl M4fB ?00. [ THEIt 
rirn AJ!F TO fftflCH BV TJtE ^UPI TDTAL 
9EMU3f OF THE RARE fMNCE OF rau 
f:cACTLTp rotr AftC bii;en 

THE SAME OF TO OET THE 

ttlfnSEfr VErHQUT 00 1 MS O^iK. 
TffU AftE OIVEM 14 HilfT A! 'd UJfAT 'Hf NlfHBFR 13. THIS IS rtQT 
Ttf£ ElACT irtl^BEIt flJtLT Qi^E CLfl^E. ALL VfltJ Bfl IR THIS GftHE 19 
KCIOE ttHEX TO ST&f. AT THIS POINT TJJUff TflTAL IS CDriPflREia 
idlTH THE NUNBER AOf T0JIR UIMNIHO^ AJtE ffETEEtllNES, 

PLACE TOUR ffET . , . rOU HAVE * 200 TO 3f£ND.T m 

rOtlft aUCJT l!*l[I^ GARH IS A 

TOO HBST cone IJITHIN S tf[THOUr SOTiTO fliJEn TO UTN, 

HEAE UE 9D 



i:^p[J I ] IS A 

THUfl TOTAL IS 



TMIt THlflL T5 



J -TDU ARE TflTIHG ID CDHE HEAR 2B 
i HO TBI] UAHT TO COHTIflUt' rps 



-tOV ABE TRTTNS 

ao Tou UANT ra 



TIT CWt WAR 
CONTINUE? TES 



20 



CARD 13 18 A f .TOO ME TftTINO TO CDHE i4^M 2S 

Tout TffTAi 19 ta M TOU UAlfr TO CDHTIHUET VES 



CAEB t 1 13 A ^ -l-OU ARE TBT1«0 to CQ«E i^EAfi ^i 
YDUft TOTAL IS 21 OO TDD UARl TQ CQilTIHUf* TE5 



CA«B » J IS F 
YDUFE rOfAL IS 



m ,TflO Al^E TRTlNfi 

Jt ID TOU VJ^HT TD 



10 CDNf JlfAf^ ?S 

COHTTNUET NO 



TBQ ll»- T«E HUftBEB Lfr9 32 lOUR GUfSfi TflTflL HAS 31 
lilTlilN rOOP LlPin CAftB, 

TBI! JfQH HAilE * ?^^ IH CASIf Tfl BET IN 1B£ NEIT GAHEI 
UOlfLB mu H« TO PUT r« Kn UNE? HO 

HDFE TOU HAB FUN. 



ro 
?» 

» 

?• 

100 
110 
1J0 
IJO 

13C 
140 

IfO 
200 
2S0 
220 

3ja 

2« 
227 
2!9 

230 
2AC^ 
2^2 
2iS 

370 
2 BO 
233 
2S5 

2S? 
290 

2S0 
2^3 
J9* 
29? 
2fS 
300 

313 
32S 
322 
324 
340 
350 
JJO 

37fl 
375 
i77 
360 
393 
387 
3»0 
410 
300 
510 
52& 
3" 

540 
5AS 

370 
600 
60S 

dIO 
dIS 
620 
43D 
^40 
iOfl 
433 



TABfSOJr^TvO TD TErt^ 
TABCES^J-CEEj^TigE COnPUTtfriQ 



flaruiSTOuH rcEU jeaset' 



tEH. [tiflT HHKf j:Dfl£3 FRflH THE" 
THEUE ftRE NO FiCt Cj^RDS - QNU' 
EAST AtfD FU« TU PLAY If T1]U" 
SJl HEAD IWE INSTRuCTJUttf 



ANT' 



*1IELCB« TO THE BANE PF TUD TO 

■^fi^&CI^L ■'BECJt OF CAfiBS^ USED* 

"THE ITAAGS 3-10. THIS faAHE IS 

"UttBEfl STAND UHAT TOU ARE BIIING 
'CflREFWLLV.-^ 

"AT THE START Of TffE IjAflf, TDO BET 
-NUNIiR BETilEtN AH^ 20i>. t tMfN 
"TOU ARE TO REACH BT ThE OUJI iBTflJ. 
"BECAUSE OF THE STA^f CHAtfCE Of TDU 

"EKfrCTLr, TOU ARE BIi^EH AH flUOWflHC£ CARH. THt OiJfCT OF" 
"THE SAriF Of IB GET THE lOTflJ. BF CAKBS UITHIH THE flTSTERT" 
-leU^IEf! VITHBUT GOlHO OVER." 

'rOU AAE BIV£N A H3^T A$ TO UH4T THE NUHJCP IS* THIS ES ttOT"^ 
■THE EKACT (JOnBER DHLY ONE CLOSE, AU TDU DC IH TrtlS GAHE [S" 
■IfECIliE UJtEN td STOP. AT TfllS FOIRT TOUR TOTAL 15 CDnPHREB" 
*UUM THE HUflHft AND rOUR UPiJililOS AfL£ ITET ERill HE! . - 



PRIWT 
I^RIilT 
FAlMT 
FSIMT 
PKIHT 
FPIHT 
PRINT 
FRIHT 
PRIitT 

PfilNJ 

fRIrtT 

fRIMT 

fftt*fT 

PRIttT 

PRUT 

PRINT 

PRINT 

FHIHT 

FSCNT 

PGlNt 

FftlHT 

H*200 

&*0 

T=C 

ll-I**rae*ttNS(lNt23 
^»JMTCO*R^fB^T]^t□ 

R^aKTnS*RflBn)]-+|]/C{M} 

^■lttTC2*RJIBiT)4T> 

If S O I THE* 27D 

E^IHT[H-[(|iR}J 

SOTO ?B0 

E^INTCN+{N4R|| 

A"TJ«rt»'RNBtn5425 

FRlMT 

fRWT "PLJCE TOUH IfT , - 

INPUT i 

If R < THEN J97 

If tf >^ B THEN ^an 

PftMT "TDlf CAN^T BET NQRE THflT TDU'VE &BT 
QOIQ 2B5 
PfrlifT "TDB MAT 
flOTQ 29 S 
PRINT 
PfltNl 
PRINT 
PRINT 
PRINT 
PRINT 
B-Hfl 

C-IJ(T4?*flHB£lH!> 
PRtifT "CAJIB B";Dr^ 
T=T-tC 

IF T <3 N TKEN 3S0 

PflINT '^TOWl TOTAL IS OVER THE HUflBER-;N 
BOTO 570 

PHINT -TOlift TOTAL Id "jT;- ^ TOB W^J TD CaHTIHHE" 
INPUT 01 
PRINT 

IF LFFrt[Sl,n = -T-^ ThtN 32S 
IF I ^ N-A OR T > W THEN 550 
fRIRT "IBB OlJJfc The MUnOE! UA3 
PRIKT -^yiTHlN TOUR LIMIT CAftQ,- 
it=N-FO 
GOTO 40 

PiriNT "TDU BLEI^ m 
CR-flh-T 



ON UIHNIRG. TTPE [N 
*ICt 4 fijlNBOM WtlJ^BER" 
IF flOHE fAflDS CH4iSi.ti,^ 
SETTING TB THAI KUH^ER 



TQlf HAUE 1-;rt"' TO SPtNIf-" 



ai BET AQAlNSr TT]imSELF.' 



■fdult aUCKT LIHIT' [^ARB IS 
"rOU MUST CtftE illTHlfl "|a;- 

■HE»E tfE en* 



A 'iA 

4l[THaUT 



BamO OU£R TO UM.- 



IS A '*?C;VT1I& ARf TRTm TO COflE NEAFf "JE 



AM AUTEHIATIC LO^Si 



^;h;' fOi^R BUES& tqial uas-;t 



tHE HUMflEfi UA^ ";N;**^ DUTSIBE tOUR LlWT BT 






PtrnT 
PfifNT 
M«fl-B 

PRINT -TOU NHV HAVE *-;H;- IN tASH TD BET IH THE NEiT fiAtt£]»* 

JF N t" IHEfl i55 

PR] NT -imULB VOU LIHE TD PLAT THE NEXT OAflE"! 
[NPBT « 

IF 1.EFTH«,1J-^T" THEN 223 

FRUIT -HCPE fU^ HAB fdPt,^ 

C{]TD f?7 

FSINT 

Pi^INT CJtp1[;?l 

PSIN: *TDhf AHC WailElf TDU MAV PfBT PLAT flNrMQRFJ ►* 
EiH 




UFO IS asiraiegy game in which you 
play again St the computer in a life-a nd- 
death struggle for superiority otspace. 
Jl fakes place after a space war with 
another planet in which both earth and 
the attacker's planet are destroyed. 
Both planets— basically similar in 
strength, social structure, and sdeniif- 
ic awareness— realising they are 
doomed, launch a "life boat" into space. 
The lifeboats are equally armed and 
powered. 

However, the aliens are much belter 
marksmen, hitting once out of every 
two shots (in lines 8E0-S90, the 
computer's odds are set). The reason is 
as follows. The enemy ship's decision is 
made by ihe program; the enemy will 
only retreat 11 he feels you are ramming 
and will approach only if you are 
running and/or his fuel is running ou! 
(smaller weaponry eats up less fuel). He 
will only use option 6 {no move but 
gains fuel) if his energy is below a 
certain polntr In other words, you can 
think, while he cannot. Vou have the 
advantage otyour mind.sotheallen has 
been given the advantage of a good 
steady aim. 

The game Is set in the future: civiliza- 
tion Is destroyed, 150 people are left, 
and you are in command. The enemy 
has ne'itsf truly been seen, as many 
enemies are never iruly seen, but never- 
theless you mus] destroy him or be 
destroyed. Your weapons are ex- 
plained and thft game begins. In your 
command ship fs a control which will 
not aHow you to make an illegal move. 
Thlscontnjl waits after you fire for the 
shot to reach the other shfp and for the 
explosion reports to reach the ship. It 

then gives a full re port of power drain of 
both ships. ]' your power Is not nega- 
tive you are still Ln the game but once it 
drops below zero your crew dies [the 
energy level is theamount of energy left 
to counteract Ihe attack. If more energy 
h its th e sh i p th an was repu Ised, the sh i p 
is destroyed. If the amounts are equal 
then the ship had exactly the same 
amount of energy as the attack 
drained,) If In any game you can get 
c I ose enough to you r en em y to use your 
heavy guns without frightening off the 
enemy (5000-nooO). the game will last 
for quite a long time. Theoretically this 
game wril fastforever if played logically. - 
Written by Raymond J, Kemay, UFO 
first appeared In Crsalive Computing 
in Jul/Aug 1977. A modlNed version 
caNed Star Wars appeared in Sep/Oct 
197a. 



\ 



RUN 



UFO 

CfitilT^JE CDHPUTING 
flOfiltlSiaUN itEkJ JEfiSEI 



DO rati UAMT [«&TpUC]IDttJ^ rES 
fUU flfft ABOUT TD SECEiyC UlCH SECUtlTf IHfOfrflflTH 
PJ-EASE l^J IHE ^OnPUT£R AEAD HUT AFIfR KEAHIMG 



TttIS te THE TEAfr SftDC-.C-VlLilflTEOff flS YOU KNOU IT UA^ 

BllH DESTROrZA-.-MAT'IllHS HAVE ^E£N flEHUCED T{] ftUB£L£ 

I# A NASSEVE SPACE ilAlT 

"fCir ARE DNffDAflD A SPAfE SH]? LfCUSf ?QLE PURPOSE 

13 TO SAFE GUARH THE IS? PEOPLE ON TfltJft SH1P...TH£ 

S^Ll SUfiiJEvDtS.^^YOUS J4[5?ION: FIHH A PLAJ«ET SUITABLE 

fW TBUS CflHUdSTS PIlOBl,E*l[ THE EHtHT OF EARTH 3TJLL 

ELI3T3, ST9A^$E CPEl^^UJ^ES NEVER SEEK £T KAH 



BT THE Tlflf fCU frEflD IHTS EflflTtt UILL NO LJINGER E^T^T**, 

HERE IS rouff VITAL Di^Tt^H: 

TffU ARE ESUIPT UITN lOOflO UNITS BF ENEfiGT 
UttEM IflU RON BUT THE ALIENS UIU HESTPOT tW 



irPE HESCHPTIDN CflPflClT-J FU£J_ BRAIH 

1 HfAVT eJjNS fl-l1i}0{l 10 UHITS 

2 UAJtHCAHS ]i}«0l)-1D0i]i>0 r4l> UNIT? 

3 LASEft lOl>PC-Zi]l}i?^ EODO UNITS 



.CiPTIONd 
* APfR5ACH 100 UHITS 

5 RETHtftl " ---35^ UHIig 

i 9t iTplfIB J TOU £AN PAS? iHB f^AlU ]09 mUi 
[LABQiTEl^^ UBRE TO PFrQDlfCE PDUtl^] 



ENEH'r 

THE EilEPIT HAS THE SAME CflPABILlElES THAT TCU HAi|E 
EACM TInE A SKIP tS HIT ITS ENERGT LSftlri IS £QUftL tO 
THE AlDUMt BF ENEAGT SPENT*]i} lEXHEPT USER JfHIGH EQUALS 

THE AHOJNT SPENT:t3 UttlT5? 
B8JH SHIPS ARE D*r THE 9AME (jISSIOHt DESTINj^TIBN Attlh BOTH 
ARE DH EOBAl, TERi^ 

(IRFORIl^HftrLT tUU «JST KILL EiCH QTHEi^ TO UIN 
TffUli H^IIHBH SPEEIr 15 A JIJAP OF 5flO00 UHITSp ffDilEyfR 
SPEEDS i^AJlT BETUE^tf |i>i7^0-5DCi40 

UARlfEAUg Tftfii^EL AT 3500fl FEET PER SEC*-.ShELLS lOOfl PER SECOUB 
THIS 9ESSJ40E yAS flECt^RDEE £All1H CS QEj^b^.-flOOD LUQi: 



Iff IS JS CtftPOTEfr CUNTJfBL UttAT 


IS 


"f^JR HAriET 


BfEUGE Bh 


■/EAT BOOB BRUISE B. S. 










LEAUIffO PLANETAfir flR£IT BRUCE 


B. 


S. SHIP 


APPRQACHINO 


1fl0O25 NELES 










UHAT I^RE VUIJR BEDERS BftUCE B. 


5.^ 


3 






LETS NOT CfiflC« ^JflOEH PKESSUHE 








- 


UHi^T I4RE TOUR BRBERS hRUCE S. 


ShT 


J 


. 




LASER f IPEH 










BlPEtlT HIT EltEH'f SHEP^S PQtIER 


BQUH 






ENEHT SHIP ITEPITRT 








J 


RANGE > 19&IJ2J PBUER= 7flOl> 




_ 


f 




ENEJtr fim^ LASER 










UEREC7 HIT POilER SflUPf 











ST 



168 



STATUS Bf 3JIJF 
FrftHflE= 3BCH)2^ POWER BUPfU^ 4000 
UHAT riRt 70Uf! ORHERS Bf^vCE B. S.T i 
LAS£R f iREH 

niREDT HIT £HEH7 SHIP'S fOuEH BC^UU 

EHtflr SHIP Ft£rOfiT 

fiflifEE^ IB5023 PflUEflE 3fl00 

EHfHT FIft|9 USER 

DIRECT Mn^^.,. fOtfEft HDtffl 



STjITEJS Of SHIP 
RAHfiE= 1B0OZ5 FDUER Sl]PfU= 20D0 
Ufiftl fiHE tOU* OlfHtRS BRLiCE B- 5.n 
1.4&ER f IJfEI^ 
IflSSEL TdO fJ^B 
EKHT SHIP RtPDRT 
HMfSE-p hfllJ0?5 PflUEftH 3D5a 
EKEtir flllES US(R 
DLflECr HIT PDWEir ITDLIff 



STATUS flF aJllf 
fiMGE^ 18(11)25 PDMER SifPPL T " - SCOO 
£*lfi17 IS VICTDfr LIFE SUPPaftT FOr^JQ CREil »ri«6 



PUT As^mr NO 



J_I9T 



10 

?* 

30 

^0 

40 

30 

90 

lai^ 

102 

1D4 

1{M 

110 

S70 

t30 

KO 

fiO 
tJCl 

ieci 

200 
1510 
2?0 

2^0 
2S0 
2^0 
2?0 
275 
^60 
205 
J?0 
295 
300 
J 05 
310 
:!20 
3J5 
3! 7 
J2S 
330 
J50 
JiO 
J 70 
3 BO 
IfO 
«0 
^10 
420 



fRIHT TflB<2ft5;"Ltffl« 

PfilHl JAB<f9?;"i:nEriri";t COflPUTJflB" 

PRIt^T rAB<rfi);-M1]RRISTaiM IffU JEBSEr'' 

fRIHTiPfltHTiPtrNT 

BM Ptl) 

PEfl UFi 

PRlJfT ■ [iQ TBU UrtHI lilSTJiUr HOWS'; 

IHfUT Al 

IF L£FTi(M,t3 = "tt- 

IF LEFT1CA*j05*'T* 

00 TO »0 

PRWT VDU ARE 



rilEN 
THEN 



4a* 

|]0 



T TO ftEtEllE HIGH SECUftlTT 



IHEORHATlDfl' 
REALIMS'' 



fRINT 'FLEftSE EftT TfiE CQHPUTER ftEAB QUT AFTER 

PRINTtPfrlHTiPRINT 

fjfm 'THIff IS THE Vffift JOOO.-.CIVlLIIATiQil flS YOU KHOU IT HfrJ' 
'&Etlf lE3TPflr£ii...WflTI(lff5 iJ^iJE EEE*l RETHJCEB TO RUBBLE- 
^IN fl AA^&IVE ^PACE VAG" 

•VOtI fiBE Oil ADA RD A SPACE 5iIP UHflSE SjJlE PURPOSE" 
*I5 TO SAFE BlARIf THE S50 PEOPLE ON VJUH 3HJP...TflE' 
"SOLE SURUJyOfiS.H.TDUft JUSBIflNi fim A PLANET 5IJITftffJ_E" 

"FOR raUff CDLOtflSTS PROHEH; THE ENENT OK EARTH STILL" 

"«ISTS, 5TRflNfl£ JlREATUfiES ffEVE*! SEEH ET MAN-:PftIPfT 

^PV THE TIHE TOO fiEAEi THIS EftRTH U[LL NO LOHGtR EXIST 

''HEJIE IS TOUR VITAL DATUH^" 

TAB^til5;"T0U ARE EBtJIPT LITH lOoOO OHTTS OF EWffBT- 

TAB<Ffl>t"UlfEN TOU RON ^TUT TJIE HCENS UILL LESTRDT VQU" 



fRINT 
FRII2T 
PRINT 
PtIHT 

PfilNT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 



PR]NI:PRl«T:PRINTtP(r|ilT TflBC25];**J£flPD*fRf- 



M^ 



fRINI 
PflINT 
F»I!IT 

Pfll (IT 

FUltfT 

PlllNT 

PfilNT 

PtINT -1000 UillTS 

PRlNT[PArHT;PG[Nl 

PRINT - IVTAfft5^; 

PRIHT "100 EIHITS" 

fftHT ■ S" ; TAB C5f; "RETREAT "iTftJC 17); 
100 UMITS" 



';TAPri?);*o-nooo*;TAE(27h! 



"TrPE ";TflB^5? ;-iiESi:RIPTii]«-;TAa£i ?i; ■■i:ftPAi:iiT":TAi £24? 1 
■FUEL BRAIN" ^ 

■ i";TflBr5];"NEAffT smv 

"10 UNITS" 

^ Z^TAB^ 5] * "UftRHEAIlH "iTABn 4) ; "lOOOO-l l^^)1^0l>-;TAE^ ?7) J 
■0 OEflTS" 

3";T^B^S?J'LftSER";T|lB^l 



|lBtia?i'M0a00-2O0O0";TAB[27»; 



ll 



B^^5 5;''aPTIQ*fT' 

APPSDftCH " ; Tft£ M 7 > ; ■— ' 



TAB(2J]: 



PftUI 

PRIHT 
PfllMT 



'-;TA£C2^] 



" 6"|Tft£[5];"BT TVP1H6 i lHU CAff PASS ANO GAIN 100 UNITS' 
TAB[;i?;"aA£BRERS ODRK TQ PGOB4fOE FBUERr 
PfiINT]fRINT:PR!RT TASC ]S);'£||£Ny' 

PRINTiFRINT "THE EJfEttT HflS JhE SAHF CAPABILITIES TJIAT TDO ^tft'JE^ 
PRINT "EACH TINE A SHIP IS tt]T ITS EHERGT DRAIN TS £UUAJ_ TD" 

THE AMflUHT DF ENERBT SPENT*JO CEKCtPT LASER UHCCN EQUALS* 

UNITS)" 
SAPIE niSSIGN, n£5TlWATlDN ftND flOTH- 



PRJNT 
PRINT 
PRINT 
PRINT 



TAB[30?;"TflE AHDUNT SPEHT'J 
"BOTH StilPS ARE OH TH£ 
"AR£ ON EQUAL TERifS" 



4S0 

4(0 

4£5 
470 



TO MW 

UtfJTE, 



KCUE'JER" 



490 

aoo 

510 
512 
515 
520 
330 
510 

S70 

5S0 
590 
5f5 
dOO 
dIO 
d20 
AJO 
440 
£50 
4S& 
dJO 
£?0 
^BO 
ifO 
700 
705 
710 
?|4 
7U 
?» 

7n 

7J0 

740 
750 
740 

7?0 
780 
790 
900 
303 
SfO 

b:o 

9J0 
H40 

ado 

fi70 



BEAS,..OaOI] LUCK" 

CQrtTfiOL UMAT IS TOLIR NAIIE'^; 



f^fillfT *ifNfDfiTU*fATLT TDU MOST KILL EACH OTHER 

PJIIKI "TDlfi tfA):iHBh SfEEB IS A JHJiP OF lOOOO 

PimiT -SPEEIiS VAfiT BETWEEN JOOOD-SUUOP" 

FR[JIT "UAfiHEflilS TRAVEL AT i^OOQ fEET PER SEE, -.SHELLS lOOO 

PJrtilT ■' PEH SECOND' 

PWifT "TN3S ilESBABE UA& flEEDRBED EA^TH IB 

P*r[HT;PiriHI:fRINT:PRINT "EH[3 3S CBflPHTEfr 

IHPUT ft*:PSEKT "VERT SODB ";A% 

F = t(iOOO:Pn Jih0l>0il:A=RJfIil!)*200O0O 

^^iHT "L£AyiJIB fLANETAfl-J ORBIT ";A»;Ei;E:*!" ^HTP ftPPRDflCHINfl ftT": 

PRINT 

PRINT A;"rtSLES" 

PRINT "tfMJ^r ARE TQLiR lM;BEfi5 '*rA<!B<;Cli:IJIPUT C 

B«lNT[R»riif1 1*2h-^1 

Off BOTO 5?0pi5fl^?10^?5l3^7a0p82O 

PRINT "LETS r^OT J! RACK UHCtfl PRfSSORf ^'iQOTO 520 

IP J^M1{I05 THEN SiO 

PnP-IO 

PHIilT "El/rfS FlirtD"C 

FOR H"1 TU AN2 STEP >000 

REH X 

If 0*1 THEN i30 

PRINT "HISS£D TO BAII":CDTB E30 

PRINT "BIJIECT HIT tN^BT SrfTP-^S POUER BQtfN" 

pn?=pai-(oo:coro BJo 

IF A > lOOODO THEN 5it 

IF A < 1000D THEfr ^iO 

P=P-]OOsPJrIHT "UARHEAB LAUNCHED";FOfl K="T TD A:t2 STEP «OtHJ 

JIEJT X 

IF Q=1 THEN 49D:ffiIflI -HiSSEB TDD 



DESTRD^EB-stlCITB 
200O!5lJ IHEN SOO 



fOSO 



SB5 

390 
892 

an 

900 

^10 

920 

?J0 

940 

fl50 

9A0 

970 

9B0 

990 

1000 

lOFH 

io:o 

1D30 
loqo 
loao 

1055 
lOfiD 
1070 

meo 

1D90 
1100 
1110 
1120 
1130 
IHO 
11 SO 

luo 
n70 

1130 
11»0 
1700 

1210 



":liOTB B30 
PRINT *0IKECT HIT,,,,,£HEHY SHIP-'S PQlJEfl BOUN'" 
P[3)=PCO-1000 
GJITD a 30 

If A < 100060 iJTEtt 540 
P^P-lOBO 

PtINT "Lrt5ER ^IflEU" 
If 0=1 THEN 730 
PRINT "filSSED TOO BAQ-'fJtOTD B30 

PRINT "llfiEtT fflT ErifttT Mlf'l POWER OGUN" 

P[l? = Fn?-3l]00iQOT0 830 

B=RNIiL(^*iU0D0tlfl000:A=:A"BlpJp-f0O:IF A<1 THEN 770 

£0TO B30 

PRINT ■**=*CDiLlSIBN-***":PRINT "ftOTH SHIPS 

B = RHBU Jt.4P0O0+10[r0l]:A=A + BsP=P-]00:IE A > 

0D1O 930 

PI!I»T A(i- VOBR RAffSE IS 'JiJ-'BITT Uf CflNNOF RtJN^ fiAHBE fS HUEJ 
FdlNT "2000 00" 
A=20l>000:l>CirO B30 
F=P*101] 

PRINT "EttEflr SHIP KEPQRI-iPftlftT "RAH6E=^;a;" PDUE(r-":P(n 
IF Pin < S fi\iU MTfl 

IF Pai < 500 THEN 1040 

if fl t 50DO TH£N 1070 

fi'fWTfRrfBn ]*3)*1 td-IpiT^fiNDU J+241 J 

D^ E fiOa"0 T70p120 

IF R=2 TNElf 

IF A ( IflOOOO THEN 870 

Pil 5=PnJ-lOOP 

PRINT "EHEH-t fiRSS LASER" 

IF Q-[ THEN 910: PR3NT "ff^gSED, . -UHEWr i i-jiQH] tOlO 

PRINT "BIHECT HIT PDUEfi DOUH't riF-3O0O:G0T0 IOTO 

[F A > 100000 THEN B70; ]f A < SOOOO THEN 070 

PCnaPHJ-TOO: PtIHT "E^EH^ JIARHEAD FIRGB" 

fBR 11 = 1 TD A STEP 35000: N£IT 

IF 0=1 TN£*f m: PRINT "flISSCD.,. UHECIt"r60T0 lOJO 

f=P-EflDO: PRINT "DIfiECT NII!,,.P01tB D0LIH":GOTD JQJO 

If A } 11000 TKH B70: fU=^Pn)-lfl:PRINT "ENEH^ FIRES SHELL' 

FOR Dpt TO A STEP 1000; NEUT S 

IF D^l TKER 1000[PRINT "ftlSBEB. ^ ,HHEU i " : BOTO lOlQ 

PRINT -DIRECT KIT PQHER B8UH":P=P-100 

Pfr]|fT;FI!INT:PRINT TABf lOh ; "STATLIS QF SHIP" 

'ranbe=-;a;"fouer stjppLi^-;p- 3f p<i theh jijo 



FjriJfT 

GDTJ] 520 

PM J=F(3h*100: PftllJI -ENEHY SNIP RfSTlJIG" :SBTO lOlfl 

B=IHTCflND^l?*40O00t)00O0:A^A-B:PRINT "£Ntl1T SHIP APPRQAEHiiia 
PRINT t^ 

flBTB 1014 

B^PlfDlF)*400a04lOOOO;A=A+-B:PBl*lt "ENEHI SHIP fiETR£ATHIG";GQTO lOTO 

PRINT "THAT IfAS A FPETTT BUHB THIifO 10 DO ";A»;B1;i:4 

FJilftT "^YOUR hl^^lON ES TB PROTECT ICUfl FASBERGEJ^S HBT BESTRQV 

0030 ir^o 

PflUT "ENENV SHIPS POHER GONf MQ llfE PRESEWT- 

Pfilflt "flISSSDN SUCCESSfULVGOTD 3210 

PfiiilT -ENEttT IS VICTOR LIFE SUFPDHT FABING CREU HYING" 

R£H 

PSINT 

PflJilT 

P£li1T 

FflEilT 

NPDT 



■;fit;Blj 



"PLAY AOfl[N"J 

If LEFmAtpU 
EHB 



I"* THEN 00 



Under & Over 





Thj$ IS a funny lillle dice game in 
which you're belting on the outcome of 
roihng Iwo dice. You may bet on any 
number from Iwo to Iwefve, if your 
number ia exactly the same as shown 
on the sum of the dice, you win at four 
to one odds. \f your number is under 
seven and the roll of the dice is under 
seven, you win even money. \t your 
number Is overseven and the roll oM he 
dice fs over seven^ you aJso win even 
money. Oniy a bet on seven ilself can 
win at four to one. The program goes 
on until you run out of money or unlil 
you Interrupt it. 



UIIBEV M Qi^P 

CfiEliTIVE C1]APJJTII4e 

|tOB»STDtM| JIEU JERSET 



niS IS A BME OF UMIffR AHD DVEff. IF YDU fJCt 

■KiEff m OVER eevcic, reu hill bin ^veh mmet. 

IF rim Picir tvtK tJu iiSlL vl*f nOHEr at FQiiR lo Ofif 



HIAT HUNIER ID TDIT UiBH TO PLAT AVD WU IIUCH 
M rOU UAHT TD lET Dfl lilt HUHBCR'r 4^14 



THE BICE HAVE ffDv BCEli Tritaitn. THE RESULTS 

AGE At FrtLE-OHS: 
lit II BIE 12 SWi TQURtt 

15 7 4 



TOSS 
EV€H 



■MhiTDU LDSELini 
ThE A^UrtT fOU tH)il MAliF IS 100 



1 




UliAr tQrltER DO TQU iflSH TD PLAT AUD HDtf WZH 
ID rOU UANT TO SET* ON THE HUAB^R-^ 4,10 

THE mCE MAUE hfliJ S£Eil THRDUH. TItE RESISTS 

■RE A$ FQlLDhlEE 
blZ m Bl£ aZ 9UH TDURtt 

14 9 4 

•M4M«frTmi ifJN EVEN flDHET**»*»* 
THC ftNOUAT TOlf MQU HAVE 15 110 



TOSS 
QITBErr 



170 



UftAT ^UHK? \^0 '^G\l JIESil TD PLAY M^t mU NUCB 
M ^M \^M-\ }\i htJ DN [HE HUftlEfi-^ 7*^0 

TIE BICE HAVE VQIf BfEif TfinaDH. THE RESJLTS 

BIE 11 HIE I? VIH YDUR# 

bin? 



nvEir 



UftAT HJHBER DO TEll) ttlSM TQ PLAY AU| NQU HUCH 
IH} TQU ilAN] TO BET QH THE KUHAEH? 4^2250 

TITE DICE 14AVE NOU ffEEB Ttf^MM. THE Bf 9ULTS 

»£ A$ FflLLOHS: 
»IE I) BLE » BIM TGUftH 

I 5 & 4 



IBn 

WfDER 



UrUTOLT LDBEMTII 
IJIE AflOUlt IDJ mu ttAVE IS ?0 






UHAT HUMMER TKT TQU UIBH TO PEj^T A^D HQU HUOTT 
BO TJ)tl MJiN^ Jlj i=ET ON iHf VJHBER^ Brld 

THE BLCE HAUE HiJII BEEU THRQliil. THE ^E^DLTS 

ARE AS FOUOUSI 
&IE 11 HIE B2 flUH YOURt 

2 1 J « 



TOSS 
IJRIIEI? 



UHliT ifEJIiSfR no YDU UI?H TD PlAl AND HQU iKO 
DO V]U kA^T- TC SET HIT Ti4E NUMBER? 7,4^01} 

THE DICE HAUE HDU AEEI TIREIUri. THE BESBLTt 

ACC AS FflLLHUS: 
lit Bl tli HI 9M ri}UPI 

J 5 I J 



TDSS 

DVEft 



VOU LGSEMIII 

THE AHDUHT lOU N(Hl MVE CS 9fl 

UttAT MUM&ER 00 TDU UISH TD PLAY AMD HflU HIJCH 
DD TDU UANT TD BET ON THE HDHBER*? 9,^ 

THE BICE flA^C HOU BEEN TKROUH. THE BESULTS 

AIE AS FDLLOIf^i 

BIE 11 DiE I? tm TOUM 

2 1 J 1 



TDS9 
BHBER 



THE AADUNT TDU NDU J|AifE IS d 

TBE SANE r& Di^ER AHD TQU ARE FIAT BRGKE. SORRT CHARLTE 
THIS f^RfliJf J THAT IT [J KDT GODH TD CAKBLE 
DD m VANT TD PUT AGArK^ MO 

Ok 



■■■'■TOJ LQ3EIHM 
THE AnDUHl TOD NQU HAVE 1 9 » 

CfRAT #DH|E(r DD ftfO VlSH ro h.AT AtfD HQU flUCH 

DD fflO UAHT TD BET ON THE HUHBER-? 2,10 



THE mCE HAVE HSU SEEit THRQDH. THE RESULTS 

ARE M FDLLDySt 
HE II DLE 12 StJH IDtHt 

S 9 10 3 



TflSS 
QVER 



■MiiTOU L0SEM1! 

THE AnoUVT TQU #lJu HAVE IS 30 



JJHAT NIMBEE DO T^U UISH 30 FLAY AUi> HOU nuCH 
DD TOU UAHf ro BET OR THE HUNGER? 6p]0 

THE DICE HAilE HOU BEEN THRDUN. THE RESULTS 

ARE AS FOLLOUS: 
HE It DIE 12 SUA TOUM TDSS 

i 2 i i UNDER 

*t4^4t#4:T1^U JItf A TO ^*4H»U**+ 

JW£ AHOUHT TDU HDU HAUE IZ 9» 

UHAT HUN DEC SD TDU UISH TO PL At AND HDtf HUCH 
[TD YDU UANT TD BET DH THE ttUHBER? S^n 

THE DIDE HAVE HDl^ BEEN THROUH. THE RESULTS 

ARE Al FQLL0U91 
flE II ME §i flUH TQUPl Tt89 

5 3 I B DVER 

4 »****»* TQU U[N 4 TD 1 +***** *:F 

THE ANOUNr YQU NOU HAVE 13 4)f 

UHAT HUHEER DO TDU UISH TO FLAT ANU WU NUCH 
DD TOU UAttT TO SET DN THE NUHBER^ 7^450 

THE DICE HAVE NDU SEEN THAQUN^ THE RESULTS 
AIE A9 FOLLOUS! 

HIE fl3 BIE B2 9M TOURI T093 

t ^ 7 7 EVEN 

f**t4t**T0U ULiI A la lO«4»«* 

THE AHOUHT TOU JCOV HAVE IS Z2H 

UHAT HUHBER JD TOU HISH TO fLAT MB HOU flUCH 
DO ^DO OAVT Td BET ON THE ffUHBEff? 4,27^i\ 

THE OIDE HAVE HDV fiEEft THBOkM. THE AESULTB 

ARE A& FDLLDUS: 
BEE Bl DIE 12 SDH TOUBH TDSS 

A 1 ; - 4 EVEN 

TMhrDU LDSEUIM 
THE ANDUNT TDU HBU PMl^E l^ 2250 



1t« 

no 

12« 

no 

ISO 

uo 

IJO 

1^0 
200 
2lD 
2^D 

3JD 

350 
3fr0 
270 
290 
2¥0 
2f9 
300 
303 

307 
310 
315 
315 
31? 
320 
330 
340 
390 
3^0 
3?0 
^DO 
3«0 
400 
410 
420 
430 
A40 
410 
440 
4J0 
490 
4?0 



QiJEfi** 
CDAPl^TT^f^1" 
NEU ^ftSET' 



pRitfT ^ftB^^3^;^'UN0Eft or 

PRIttT TAB<20^;"CR£ATTVE 

PRIHT TABi1Sh;"HDftEI5TDUHp 

PR[NTtPt|HT]PETN7 

PRIHT-THLS [5 A DANE OF miE» AND OI^Eft. IF TOU PICK" 

PRIHT"UHDEfi OR DVER BEDENp TOU UllL UfH EVEH HONEf.' 

PR!HT"[r YDU PICK EVEJI \Dif UILL UlN NONET AT FOLS TO ONE" 

PRIHT-QODS, TDU HAVE HOD TO STAfl UIJH. GflQO LUCK?" :PRINT:Ffi] 

A^IOO 

RESTDSE 

ftEtt 

READ A4^£t,CI 

BATA 'UKIiEP\"OiJtR"p*^El»EN" 

FR|N1*UHAI NUMBER 01 TDU UISH TD PLAT AND tiQU HUCH" 

PRINT-IfO TOO UANT TO »£T ON THE JtUNBER";: INPUT BfD 
?HINT:PRIHT"T*IE DICE HAVE NOU &E£N THRDUN, THE ftESUllS* 

PBlNfAKE A5 FfltLDOS:' 

a-LHT(4**!ND<1htlHfl"IHTCi*RHDa]H) 

PftlHT " DIE il*j-IlIE i2-,"SOH%"T0URlt'*t-T0S5'' 

IE OtE:?7 tUEH 310 

[F Q«R=7 THEN 320 

HfTHT Q,fl,0*ICpBHA*]f^IHT 

IF B=OtR THEN 350 

IF B<? THEN jgH 

ODTD 410 

fRIHT l>,R,9tR,B,B*:PRIHT 

IF B=D4R THEN ^90 

IF B>7 THEN ?H0 

GOTO 410 

PRIEiT O^RrO^RTEtCltPRlHT 

IF t>fl+R THEH 35Q 

GOTO 42^ 

A»A4C4*C:r 

PRIHT TAB(20r4:P4M4MTQU UiVt 

FftlHl^'THE AHOUHT TOO HOU HAVE 

A=A+C 

PRINT TAir20)'^*****»TOU tflH EDEN 

PR INI "THE AHDUflT TDU NSO HAVE IS" 

A<A-C 

PRINT TA&tiOJ TOU LD3Ei!iM" 

PBINT'THE ANOUNT TOD NOU HAUE IS" 
IF A>0 THEM 190 

FBIHT-THE SAHE IS DVEK AND TDU APE FLAT EROtiE. lORR^ CHARLIE^ 

PfttHT''THI9 PROVES THAT EI IS NDl UOOD TO fiA^lALE^ 

PRLHT^BO TDD UANT TO PLAT ABA iR^^j INPUT lA 
IF lyitCUl^lJiV THEN laO 

ENH 



4 TO |*i*if*44t'^ 

IS" n :PRINT:DaTa 



4W 



HONEf»**:t«i**' 

\ iPSINTlDCTO 4A0 



A tPfflHT 



171 



Van Gam 



VAN GAM is g simple game with an 

interesting soJulion set The winning 

sequence pairs are tormed by certain 

mutually exclusive s&qusnces. using 

the golden mean, ■— 

1 *y/s 

2 

as an irrational 

generator. See explanation, lines 40- 
T30 



IFT=1 *V5 



arrtJ X = T*l,Y = — >1 

then for integers N the winning se- 
quence generators are 

INTfN ■X)257 1013.... 

INT IN -Y) 1 34 6 8 

Jt IS interesting to note that the union 
of rhese sequences is the set of 

integers, and therr intersection is 
empty. Thai is the case. In fact, for any 
irrational generator, but only T will 
produce winning VAN GAM pairs. The 
game rs not much lun in that the 
average user will never be able to beat 
the computer m non-trivial cases. 
unless he has been taughl the winning 
sequences. 

This program by Alan Brown first 
appeared in Cregiive CompuririQ. 
Jan/Feb 1978. 
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TDUFr HOVE: T BR 
Kn.. 1 lAKE : 3L 

I'ouit navi- ' 38 
Hh.. r t4pi:e I 2i 

YDflH WJi: ? 31? 

. lOIIFT HOIPE! ' IP 
Mn., I T4IIE : Ifi 
SBPPl - J UIN. nJJN'T f£EL WBLt - ]'n AH EffFJrT. 
J>n IQU JHr TD PUT fltfilWT y££ 



OEilRED PILE SIZEE f NUrtEf fc . rtUfl ffEB h ■* 5i,l4 
Pn TDU UflKT TQ DC FJfiST' HO 



LEAirShE a 



i.EDI'Jril! 3 



LEiBVlPfJI 3 

LEiBWlNfl I 



LEqUTrJG 1 
LEflyiKG 



L£FT BIQHT 



24 



1 TAKE r It 

TDUP BOlitS T ?B 

111.. I IflKE : IL 

VOUG ROVE: * ?E 

141,. ] nt£ I R 

TCUff HOVE: * IB 
HA.. I IAK£ i IL 
Y9LJP HOUE: < 7B 



LEfivitf& ::3 



iCAVlhB IV 






16 



11 
1' 



17 



IT 

11 



UANGAH 

EiflEiBriUt fDnFLiTInO 

1D(l(II9TQMJr, HEU JERSEr 



WBH unHOFF'5 QiinEr M TDU IfflHT INSriTUCTl l>N4' Yt5 

1DU ARE TQ CREATE TUQ PILES OF nDlCHt^, EACH CCf T Q T'' [iV& 110 

Of LESS. VQU Plat ftlTFRHHTELT UjTM *E, JiHli DOR m'If= CON3f9T 

l*> TflKIHil flllflT I OP ni>Rf rj*TCHt& FRDR QHE PJlE DHir, QR 
4B] Fi^kMC flL'fil THE Sflflt NUIBER FRBh EflCK P[L£. 

■■HE QHE UHd IBITE^ ""1 'HE ihST "illCIf Df ALL UlP5. 

EJITER lOlJR HD'JEE IN IHIS HAfir^Ef: 

^L - 1? LEFTI JUKt TUD PROfl LEFT PILE 

3R - (J PIOMTJ TftfE THREE FROfl HfiHT P[l£ 

51 - 1-1 MIHJ IflKF Fil;e fROfl £fifh flLt 



DESIRED Hit SrfES ! NU 1 ?ETr , f< L'-FFB H 17,22 
Bfl IQU UftItT til 61f fIR51? IE5 

LEFT RjQHI 



lif 



22 



fOlTR JJUVEt ^ 3L 










lEAVIHfl 


14 


12 


fi|l». 1 TAKE E 2B 


i.£i=iV^Nfj 


1? 


SO 


fOUff HiTiJt: » 3B 










LfA'^LNQ 


¥ 


17 


UN.. I TUKE : ?R 


LEA^^ING 


^ 


15 



TeUft |tflV£i T IB 

HI,* 1 rl^KE : IL 

YttUR MVtt ? 2B 

Hit.. I THE t 1L 

rfltfFr ttOvE: t 25 

Hh.* I TAKE : IL 

TOui! nenEf ' fs 

^,. J TAKE ; IL 

TDLft HDVE! T ?i& 

HPl.* 1 IflKE : IL 

TnOS HOiT^^ t tft 



LEftVMte 13 
L£iWlHfl 12 



LEiiiJiin 19 

LEftyiHQ ¥ 



LEAVIHB 7 
LEIiilSMJr i 



9 
4 



LEflVim 
LEj^VINS 



LEAVIM& 



L£AVIMfl 



B 

a 



t 



COrtfiMOutflTlDHS. TOU ARE A HEPt CLEUEIT WW BtT«£FF^3 

D^k. STE sev. 



LIST 

5 PRIHT TflBC2i);"1flflGAH" 

6 ^FTlflT liBCflhJ'TfrEATlUE CQHPUTIHS" 

7 PRINT TABHS?E"nJ]RqiSTQHnt K£U JElCSET' 
Q PRINT:PRI«T:PRINT 

j:.nt30ftfSN^^iV-i*i/s:i:=i+i 
FDR [^0 ra ?9 

S C I+2J =1147 C I^X) iQ< [*2+1 )-iHra*i] 

MHAT 1:7=0 



PRIHT 

|Nflj7 

^ftlWl 

PRIH7 

PR[NT 

PRINT 

PRENT 

PflEHT 

PREHT 

PRliir 

FSIlNT 

PSINT 

PRINT 



£1:IF LEFTtCSt 



OAMf^l m YDIf tlANT INSTEUCTTQtiS"; 
p1?=**l" TH£N 130 
"YOU AR£ TU CREATE 7U0 PILLS OF fiATCNESp 

-OR LEE9, lOlf fLflf PLTfFrNATEli UITK H£ p 

-OF:' 

TA£f9i));"^i^) Tj^HIHQ AOAV 1 Oil HOKE MATChlES"; 

- FRDJi DNl P^UE Dlfl,V, Dt' 

Ti=i&ni}];N£l TAKING ^UAr 7HE SANE PtUPIBER FRH1 

"7HE ONE l*HO 7AI:ES flllA7 7HE LAST HflTfH DF *U 



EACH C0N7ftiflI*fG lOD^ 
AHD OtJn HDtiES CONSIST^ 



tflCH PILE,* 



ENTER TfllTi: MCVES IH 7H[^ MANWER:" 

LEFT) TAKE TUO fROlt l,£f=T PILE" 
filGriT5 TAKE 7HREE FROM RICHT PILE' 
»DTH^ TfiliE nV£ FFtHH EACH PILE" 



C5 



TfiBtHJr"2L - 

TAR[10];*3R - 

TABnO);*5E - 
PRJHTiFRINTiFRJNT 
IttPMT -DESIRED PILE SIZES lHIIBBERtNUNB£R 5*;S1 p32 

i=si:5:*gz 

IF L*ll>3 7HEfl 24fl 

PRIflT -OHp 7BU'RE A SPQBT^ 7DU ARE." 

"BQ TOU tfAJtT TO GO fIRS7"ifl* 

TAB^2?5J"tEF7 RIBHT" 

TftBr2?3;L;TABC33J;R 

IF L>fl THEN q01> 



[NFUT 

PRINT 

PfINT 

P=L*2 

P*R-i 

[f LEFTltBI 

If L'R 7HE*I 

PR!HT:IHPUT 

FftR X=l TO 



THE^ if a 
'"VBU LIKE 



,1?="N" 
PRIIfT 

LEN^Bl^ 



3I771HIJ DUCKSp ftariM 70U?' 



If A^LCiHHl^^jSjUK^fl DG flSCLflJl>*[B<p^pt H>1? 7tfEH -125 
JIEIT X 

[F £3=C 7HEJt ^iO 



^30 IF PJIIi(B»p^n-^t.' 



THEN 550 
Ef HIEKCBIpitpU^'C" THEN WO 
If fliimSijKjlJ^^B" THEN 5¥U 
T = Ttl:[f T>? THEN 1?« 

PFTMTiPRINT "IMPRBFCR EHTpV, S7[JP FflOLINJr AROUNtt- " :IjB70 411i 
IF S3>L THEN ^dU 
L=L-S3SftOl[J 4Hl 
IF i3>R THEN 4^0 
fl=l:-S3:D0T0 JIO 
[F SJ>L 7HE*I ^iO 
L=L'a32BflTO i7X} 

PRIHT TAHM?>i"LErt^"THG";7ABf^7?iLfTl^B(13^fR 
PSINT "Htt,. "; 
FITR [ = 1 TO 5^]&:A=A^-[iN£ST I 
IF l*R>0 THEJI 4»0 

FRMlfPflNrcPRINT '^7DI] UINip":FRIHT 

PfflKT "CDN6RABH LOTIONS. TOU ARt (* ^EfiY dfl/Eft UAB ITTTHflFF^S* 
PRIttT "GAnESItAH.*' 
C03U 1f{li^ 



71] 

?ti; 

720 
7iC 
740 
7ifl 
?7a 
780 
7 JO 
GDO 
BID 

G45 



320 



S7!i 

?Ofl 

9ZD 

?30 

9*0 

9^0 

9AI5 

945 

9?0 

??0 

liJOO 

1511} 

1*20 

10JD 

1M0 

1C*5 

1050 

1035 

10A0 

10&5 

1D70 

1D75 

1P77 

IDSO 

1D90 

ttoo 

t!H5 
111} 
1114 
IMH 

1120 
1130 
1¥P0 
1^10 
1?20 
1^10 
1?J5 
19*0 
»?45 
]?7fl 

DK 



I=OSfl=fl 

IF D4M=L TKEM 749 

[f Qfl+U^t. THEW 7fl0 

If a[lt=R THE« 
]F OtH-U=« 7flEJf 
1=1+2:5070 700 
L1=I:12=1:IF 1^1 T«E« B40 

ir = l:L2=0:[F H=f THEN B^iJ 

ft-1:a[fT0 ?20 

H1 = I:R2=1:IF Pl^l THEN a^0 

[t'l[ SOTO 7qo 

Ft|-=I:Ft2=0::f H = 1 TttEM 340 

fill: GD7a 7*0 

IF L^R 7H£H 9^5 

IF R1=Lt 7HEN 1060 

[F L1>ST THEN 900 

P-J_H-L2 

Jf afF?>B THEfl ?40 

i1"R-DCP]:R=Q{P?ij^*^"Fr"tlJ0ra 1110 

fl-L:L^l>lJt=pD:A»="B":ei»7Q 1)10 

P = RHi:2 

IF 0£f»>L THEN 940 

il=L-aiPfiL"aCF]ifl1 = "L" 19570 1 llO 

Jt=0:A*="B" 

P=11SIF RKlt TBEH P"lt1 

P=f-2:S=0 

N'M1[L"L-1tP"Fr-1 

FOR I=P 7B D STEP -2 

IF aa}-L THEM 1040 

IF Da*1 J^L THfN 1050 

IF Qa]<R FHtN 1064 

IF Oa^l J"R THEN t070 

H&JIT haOTQ 96S 

[F Q(Hi J=R THEN tllO 

ttOTO t075 

IF D^IJ-R THEN 1110 

ttOTD t075 

[F O^l+D-L 7KEN |110 

Gflia ||}75 

IF fl[n=L THEM HID 

If e-a 7HEil 9^0 

QMtDa7fl 9J5 

]F l>fi 7flEfl lion 

$:=R-I:H=WA1="R-:G0TQ 1110 

L=L-l:M=l:Ai=-L' 

Bf*"tlF rt>^ 7HEH I93S 

B*^CKR*[H+-4B5 

BJ=BI^AS 

PftrNI "E TliHE :^rTAIft4^;Bi;rfl5f1^Jj-LEAVIl!6";TABC275;L;TABt333;R 

IF L*RMJ THEN 41D 

PRINTsfRItfT *SI1RRT - I UIK- B0«'7 FEEL BftULT - I-'M AH ESPER7." 

PRIHTcINPUt -DB TOU DANT 70 KAi iSAItt^lB* 



IF L£FT»^B*^^> = ■V- THEN 130 

DD7D PT70 

Bt-CHRI aH7 CH^IO ^4-49 kBt-Bi+CtHt^fH-IMTifl/l h^lOHQ] 

GUTfl in* 

PBIJiTsPflNT "lOHKf TJJU JII57 l|0N-'7 S70P FflOLINQ AHDU7- BUZZ OFF/ 

eOTO 1970 

PRlKTiPSlHT "i3.X. BfE HOU." 

EftB 
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Warfish 



fn this game, you're the commander 
of an Amerfcan submarine with a 
mission (o seek out and destroy as 
many Japanese ships as possible 
during World War fl_ 

You may up your perFscopero search 
for Japanese ships, you may launch 
your Torpedoes, or you may dive lo 

avoid Japanese ships thai are attacking 
you 

For the most part, this is a game ol 

random probabilities. To make it more 

interesting, you might wish to introduce 

a skill factor in Jerms ol aiming your 

submarine or distance away from an 

enemy ship, size of the enemy ship, and 
so on. 

WarNsh was written by Randy Wit_ 



21 TDfiPEHOES LEFT 
NiJHBEIl OF TORfEOOfS TO fTPE"* 3 
J TJlRP£ftQf$ FIRffl ' 1 HITS -FftElCHTER StfflH 



Jflfftrif5£ TRflHSPDfit - 1T500 tflHS 



Iff TDfiPEDDE? LrFT 

i taffPEUDES FIRED - 2 HITS -TJC^HSPQRT SLHK 



HfiDEPJ, [:cl»il^riri&?P ? PERTSCQPE 
JAfftNfSE AnflUHIcIOH SHIP - ^45D TONS 



15 TDITPEIiOEg L£F] 
HllftBEt Df ][ffl?EIifl£S JQ FIRE"? 2 
5 rOfrPEBOES FIRED - ^TT5 



CSErtTT'JE £flMfUTII?G 
flORRISTBUH^ HEy JE5^5ET 

QD rOU DESIRE \Hi Rt]J.E3 Of UAftFI^H ^ T£3 

Ti3U CaitHfl^B Aiv AhfHIC^ri 5UBHi=l*:iUe TttAI SEEN SEfcCT OUT 
TD ATfflCK J^fftP-f?^ SHIPS AT SEfl DlfftlilG UDRLD UflJl TlfQ 

T«E GRErfSS FKAT C^fl Bf QE-JEH ^flE THE flU^Li^UIrtGi 
PE*=SCOPE - TD SErtfrCH Fflft JAP<ittE3E SHJP5 
rDffPEDB - lU LiUiJDH TOftKDUES rtT Jflffl«fS£ SKIFS 

sjyt - ra escape jflp^ifESE ship^ iHrti are ftifftCniHG 

-THESE A^E eOHE JtESTDRIf 5J.S, M^l SUBHflftT?^E3 - 

FAIJTae, SlM;£ff5]IIES. CUVAUfl, ?LUEfl^H, IHRESHEt 
Si;OfitFl&H. =-!.ftSHEft, TliDUTpflRtEltR 
SUECT QHE HF TH£ flfift'Je, aft USE A fldflE aF Vajfi CKOIilE 
PftlSI THf HJihE Uf tOUlf Sir^HftfilNE * TRaUT 



Jflffl^?ES£ TflRfEDa 53 a: is ATiftCfcrwa 



ORPERSt CQnJtflttttER ^ flHE 
DISTANCE DF Jrtf^flHC^E FaSPEttQ aOflT 

iSSii VftRPS 

:Z5C YftfnS 

7S<| "rfiFriis 

« TrilrSS 

-fitf aS& TROur 13 UNJIURI 



OHII£RS^ C^HflflNHER ? PERr&CflPE 
JftPAHESE ffrtlUHTEfi - 7S^5li TaNS 



24 TOdPEIHIES LEfT 
NUHJEP af TDRPE;?aES Tfl ?3fif' 2 
2 rilFrPC&OtS flRElJ - iS HITS 



D^DEfi^t CITHilftr^IltR ■? TORFEilO 

2i TflliPEttQfS LEFT 
rtPHffER l?F TORPEHDES TO FIStE^ 3 

i TBRPEUaES FHEB - fl RHS 



DEPTW aF US3 TROUT 

1) fE£T 

25 FEET 

10 f^ET 
75 FEET 
1C0 FEET 
T25 FfCT 
^1^ FEET 



□ R&fjr^^ i:OtiHAJlHR ? TOJ?P£D0 

13 TQRfEDOES LEFT 
WlJil&Ej! or I&RPEDOiS TD flk£l 3 

3 TaPPE&QES IlREtt - 2 aiTS -J^hnaflJTIOH SrtlP SEfflK 



0«I^ES?^ COflMiieES t PEIfJSCaPE 
JflPflHESE AMrtUNITIITH JHI? - ¥i50 TDrJS 



aUDEftS, cartMftKliER 7 TDRPEIiO 

10 rOffPEDDEg LEFT 
t^UnBER aF TORPEODE? Ta FlfiE^ 2 

? TDftPtsaEs fme - i hits -wiHiw^nfOrt swif suhk 



affflEJISp COMrtJfBER * PgRlSj:CI?E 
JflPAdfSE FR£[flttTER - fltOO TONS 



ORSfftS, CDHMArtDtR ^ THRPEBO 

9 TORPEDOES LEFT 
tiUMBE]^ Of TDRFEHaeS 70 FISf* 2 

? TQflPtJJDfi f[RtB - d HITS 



r]IBERSr CDHHAWBER t TORPEDO 

i TflRPtDDES lEfT 
HIJrt&ER OF TflflPEDCES TO f[pE* 3 

I rORPEIIttES FlREEh - it HITS 



0SIi£R3t CBHifflrtDEH ^ raRPEPD 

3 TQflfEffOES LEFT 
MltHfiER OF TaRPE&DES Ttt F[RE^ 3 

i THRPEBJIES FIREIr - Z HITS -FREIiOHTER SJNK 



ORBfRSt CUMHAHHtft t PESIStQPt 
JAP(y*E5£ TRAttSPOftI - nsao TUNS 



osnERSj £l^flflllN[^Efi 1 TappEua 

I TOfipEDDEff LEFT 
NUhBES OF TQ&PEtUES TD F|RE^ l 

k THRPEHOES flREn - 1 JflT5 -TRnlWSPflfiT SURH 
TiiE ass TftOUT ttflS ESPEilDED ALL OF ITS TaRPESaES 
CeNBRsTULATIDH5 OJI A SaCCESSFlfL DEPtO^-iEKT 

THE SURHAftlSE CJ^S TRJIUT \fAS SUI^K .^ TOIftJ. OF A SKIPS 
THE ENEHr TOflWASE ^liMi; 3S 57*0.3 TiJRS 
QK 



174 



LI31 








545 0=1 

550 IF A^f THE# 740 


1 PRJJfT TflB(23)-llffl?r39H" 








540 E^lifElFrNDdl^tOh 


2 PRIHT mC2D?"Cft£fltiVE CMPUTIIW 








170 IF £<>^ THEN 5?0 


3 PRIHT' TABnai'^nORfilSTDIIU, i^EU JEFe3£T" 






575 R1 = "BATTiESIIIf" 


n ffiCNT 








5S0 '33500 


6 PRINT 








590 IF £01 THEH lilO 


7 PRIHT 








5^S Rt=*fl IRC RAFT CAftHIER" 


8 PRINT 








400 V=2J70Q 


9 HDI Aic?a> 








410 IF E02 THEM 430 


10 [10iRir>n> 








415 Bt-'*HEAUV MUlflFR'^ 


3* PRIWT^DO rOU DESffif THE ftULE5 Of UMFISH 


1 ■- 




430 B= ?fOO 


^« INfUT 11 








430 IF E03 THEtt 450 


5* IF H='*#D" TrtE« 200 








435 R4=-LIGMT CRUISER" 


51 IF III--TE3- tHfB iU 








440 B^fAOO 


52 PRIrtT"TeB DR tfO OWLTp PLEASE, • 








430 IF E04 AND E^^3 TKEH b!t 


51 eOTO 30 








4 as RtT- DESTROYERS 


d* PItlhT 








J40 U^2IO0 


?4 PRIflT"¥OU DQiiNAHIl AH AHEftUj^H SuBrURm 


THAT 


BEEN 3EHT OUT" 


a?e If tO^ ANS EOJ THEH 4M 


fli) PRItfT^ID flTrflCt; JflPflBESE SttlFl ftT 


SEA DURINC 


UORLS UAB T|IO*< 


S75 Rl="5U»nARlNC' 


?0 FRIifT 








6eo u^i50o 


1i}|} PBINT- THE ORL^ER^ tflrtl CAif BE GIVfti ARE 


THE 


FOLLHUINC;'* 


i^O IF EOa riHO EOT THEN 710 


no FR I NT "PER I SCOPE - TD SEftPCH FOR 


JAPANESE CHIPS'' 


700 v»imi 


IJO PfilNJ-H^flfE&P - TB LAUNCH TOflFEBOES ftT 


JAPANESE SHIPS- 


710 IF t-^^5 THEil 720 


1J& ^filHT ^PUPE - TQ ESCAPE JAPAJtESE 


SHIPS 


THAT 


ARE ^^TTACRING* 


715 0*1 


Mfl fRIHT 








7!0 IF F<>4 AMBe<?5 THEN 730 


150 ?RINT"THESE ARE SQUE HlSTDA|£ |l^! 


?* MWT 


SOSdARlffES -'' 


725 0=2 


IdO PRINT'* lAlfTOBp SILVEESEBESt 


CAVALLA, fiLDEFISHp THRESHER' 


?^0 [F E<>2 AilD E03 TIffH 7« 


1?0 PRINT- SuOfiSFlSif, fUg^Efit 


TfiOJTt 


AHCtJfR" 


735 0=3 


IBO PRIMl-StLCDT Q^IE DF THE A£OiJ£p OR USE A 


HAHE OF TPUR J:HDICE" 


7*0 IF E01 THE* ?!10 


Z^O FR[MT"PRIilT THE RANE CF rCUR StJBHAREflE 


■ ¥ 




?*5 u** 


210 INPUT M 








750 IFEOO THEN 7i0 


22V T-Z^ 








755 Qift 


230 IlprlHTflfNBn^^FOr 








PH PfilNT-JAPrtHESE ";R*;" - **;tfT^ TMS" 


240 IF D<4 TJ^EX 33CI 








770 GOTO 3*0 


750 IF a<.>t AND JO ? THEN 3?0 








730 If fl>=1 THEN BOO 


?55 Rt-^'lESTAQTIft' 








7S5 PRIHT" MO JAPANESE SHIPS IH SIDHT - JUST OCE»'' 


240 UiZlOO 








?fO IF fl^l THE# 340 


2?0 If lOfl THft^IiTO 








BOO PHJRT Tj" TOflPCBOES LEFT" 


371 R* = "[JEaTRDyER ESCORT" 








810 PRIKT"NUN9£R DF TORFEHOEa Tl3 flRE"; 


?SD U=131i 








820 INPUT R 


;i?0 If DO? TNEH 310 








830 IF ff<0 OR T-R<0 THE" flIO 


2?1 RI^-TDRPEBO BOflT- 








a*0 iF P(>HlTi|l) THEH BtO 


300 U'70 








850 T=T-R 


310 IF B=£ on B=7 THEN JIJ 








8dO $=TNTCRNII<1>4101 


3it a-1 








S?0 IF S>R THtN QAO 


Jr; OOTO 314 








SBO B=0-3 


J13 0=? 








B« If fi-i=0 THEN 000 


3H PRINT 








B?5 B1="BAttA6E0^ 


315 M?!riT 








900 Ef BJ=1 THEi« ?aO 


iJfl fRl**T"JAFAKE3E ":»>*' IS ATTACK IHB" 






?45 a*="SUNK" 


330 IF 0>- d TItEfl J40 








?10 0=B-+U 


335 flx:flTlRilDn]t10? 








920 l,=L+1 


3*0 PRIJ^T 








T3D PRINT R;- TBPfEODFa FIRED --JS;" HITS"? 


351> PRIJ^I 








9il> IF SOO THEN 950 


360 PRI«T"DRDER5f COiiHAItllER "; 








9*5 PRIflT 


3?0 [NPUT C* 








950 IF S<=0 TMEM 940 


37t [:i = HIB1CC*p1pi^ 
3ff0 IF CI=-"P" TNEH A20 








9^1 PRINT" -'; R*;" ^;irt 








9frO IF D>0 AMD 0>0 THEN 1140 


310 If Ci="T" TWEJf 7B0 








?70 ]F r^l mtN 1140 


400 EI" e»="D" THEM ?90 








980 IF a<l THErf 23ti 


410 SOTO 3^0 








903 GOTO 340 


420 'if ir?5 OP 0>0 T«EH 7« 








9?0 If D:?=i THEN 1000 


430 IF fl>=4 THEN *J* 








9?3 PflEHl^ TREN USS -JA*;* IB NOT JNDER fllTftCK^ 


435 irS5"FfiEIGHrEft- 

440 IF AOO AKI) AO E THEN 450 








fOOO IF D<£ THEN 340 








1010 U^INT4RjrDU]^IO?*?3Dt50Q 


^ ^ ^ ^H ■ ■■■■ ■ ■■■ 

44^ ^=4501) 

450 IF P<> ? IHEN 440 








1020 PRINT "OlSTANCE OF JAPAHESC "jRl;** KPTh OF USS 








lOlO PRINT Ui^l-ASBS 'JZJ"FEET" 


455 U=?500 








1140 U-U-250 


440 [f A03 THEH 470 








1151 Z=Z«25 


465 U^RIOO 

^rtl If A07 ANIi AOS THEef 490 








IliB IF U>-250 TJIEN 1D30 








1070 IF Ri = "TO«FED0 BDAT " U^Etf TUO 


473 Rt^"Tfl*KiR- 

4S0 If AOO THEN 4S3 








I0£0 N=INTCfLNII{qh*103t25^50 








10^0 IF H + 24>7 ANB tt-74^Z IHEN llJil 


431 U = IOOOI> 








1099 U=I^O 


4^2 &0T0 490 








llflO PRIMT^THE U&3 ";Ai;" IS UHHURT" 


4fi5 11^*500 








1110 Q^O 


4^D TF A04 AMD A05 THEN ^10 








1111 QOTO 230 


4?1 ft*="TfiAJISFDRT- 








1120 PfilHT'THf USS ";Ai;" HAS BEEW SEJHFT 6T IpEFTH CHASOH" 


50O IF A(>5 TtlEtt 3U3 








1130 ijoro HSU 


^^ ■ ^ ^m m ■■■■ ^ ■■■ ^^ ^ ■ ^H ^ ^^ 

5fl1 U=1150& 








114fl PI:IRI"THE USS "A*i'^ HAS SEEN SUMK RT QUNF]Hf 


502 0OTD 510 








1i^D QOTR 11S0 


13 00 u=>Beoo 








lltH PRINT"TJIE USS ";A*|" HAS EXPENDED ALL OF" JTS llJflPEDOES" 


510 EF AOi THE« SJfl 
5rl RS^"AHi*URJTIOR 3HiP- 








M7i> IF 0<^; 1HEM nSO 

1175 rRINT'-CONORATULATIOI^S OM A SOCCEBSFUL DEPLOtJIENr' 


520 U=?i50 

530 IF A>-9 DS A=i THEN 540 

535 0=1 








1180 PRINT 

TITO PRINT^ TME BUEtfAS^Hf VgS *;A1;" HAS SUNt: A TOTrtL Ofjlf" 5 








T200 PRINT^ THE ENEHT IDNHllGE SB*IK IS ";i>i" TO*!^'- 


340 [F ik<>6 TRE« 550 
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word Search Puzzle 



This program generates the Im- 
mensaJy popular word-search puzzles 

combining names of Presidents, stales, 
types ot animals, fish, and every 
manner of objecTs, 11 asks you the 
iengih and width of the puzzle you wish 
generated and then the r umber of 
words to be hidden in the puzile. As the 
instructions role, occasionally the com- 
puter may find that it can't hide a 
particular word in the puzzle and will 
ask you if it should start over or if you 
want that particular word deleted. If 

you start over, try glvJng it fewer words 
or larger puzz/e dimensions. The 
program hicfes the words fairly et- 
ficierfJy although you can usually 
improve on Itsiightly when you get the 
final puzzle out. Since you're probably 
|U31 using this program for tun, ifs 
generally more than adequate 

This word search puzzle generator 
was originated by Leor Zolman. 




trn jou ujtNi ft BDiuriDft ppntrflur its 

UMT 13 TO BE T«E UIDTH Of Iht PUZZLE* IS 

THE LEIIGTII' 15 

UIHT a IN£ nfiJIniN WirdlEff Df UUSHS |» TIi£ PJZZIE' 10 

NdU £*Tt» fl HEAD [HO THAT (IT LI, 6t PftfNTEJI HV^R THE PtJ!ZL&l 

c :'2 cNAiTiacrEi^s nikiTiuni i 

01 . . , EUTES il UOffli Hi eWH QUEBIIOn M9K. 
TS SFEO IrfE flfEUIDd? UORO, TfPf fl MrPMEJI (-J. 

ukEPi rau ifUN sut ar uafjs, t'pe a pfjiijh i.j. 

7 Bfl3'i-» IC 

-rartrar- 
T P L T 
-pll- 

' C B Q L»*"'; 

-soboL- 

? flssfneMLEB 
r - 

T flSSEHftLEff 

' H-OOL 
-aifuS- 
T USf 
-liip- 

? SNOIUL 

• FILOr 

TUflfS II„. "ij ueRDE. 

W\l IE' MF POUDEH Trtig,,.,.. 

MfliJ ilMV COPIES Df THIS PUZ7U K TOLT IWJin | 

fHf tJlCh CQfl, HIT SETUJUf TO BEDI* Plt:*f THf 8 , . . 



GORPtnEI! LJlNQUABES 



UfllTD SEAIGH PUZTLE 
»E>TTUC CDnruiliffl 

Hcirirr&roiih, ttiu jEfiSEY 



rma Ptttstan ii b wcjid 3&flitCH mzzu DtntRi^Tmii 
inf nosxan tiike3 Ji aft df iHp^r STirriiiii, purges all 

NflN-*LflHBEIIi: tll*PACTE»^ OuT Qf rJIEtl, flHD ThGllfiPliSflnE 

ffltn i^Tij ft unen ^eapc« piizzie. 

r* iHt CflURrf gF MHI[J*f& fHE P^IZZlE, TME HflCHlJfE flftS 

FIND FMsr jr cflN'T PUT fl Pjiiti iciiliii? uijnii flifiuHEfe. fliiir 

^D JILL 4?r; iflll JF IT &HI1UI.P STflllT TME UHOlE PLTZZLE 
Q'ES. Jf lOU nOa'T UilNT ET Ffl STilItT OUFR, tTPrflU ■HO' 

u:ll tmsitli Air«r thai partlcular uinfn. re tmig 
FHT firH£R flCVim LESB Uan« Qlr BlHtH PUi^LE 
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DIPEh^EDHa' 
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ISR£ 19 TtiE A^SU^R HEI: 



I 



* . L - . L , , P , . 

- P > . . , a T » . . 

IT c . . . D . . fc. N . 

c E . , r , - . a A . 

» I L . . , ^ ^ ^ , . 

_ S I . . D . . . F 

I * . A A L . . . ^ 

F- H , B E . . R , , 

. S B P . -ST,,, 

^ ^ I B . ft s . . ^ 

, . . L C A . . i^ . . 

« - - - N . . « ^ . . 



FJND THESE HlDHEM U[»Ei>5 I|| EltE APIfJE PUfZLEl 









pli 



rpg 



fortrsn 

JTlDbDl 



1* PRIflT rABI?D^rillIR> SEARCH fUZZLE* 
2t fRIflT TABi2C^;-CfiEflTIVE CDHPITIHQ" 

34 PRIHT TflB4Ter:"1DRftIST01i#p JIEU JESSEf" 
^^ rRIHT:PRrMT:PR]f(T 



5» 

71] 

84 

?C 

TCO 

11& 

120 

139 

Hfl 

lift 

IJD 

^fl1> 

300 

illC 

320 

:340 

343 

Jin 

3J1I 
3'» 
31(1 

3fC 

440 
41 e 
420 
A^O 
440 
4M? 

470 

■1?0 



PRIHT 

PflltfT 
PfllNT 
PfllNT 
PEINT 
PR£itT 

PRlur 

PRINT 
PEINT 
PflBT 
PRINT 



■ TftJS PlTOAltAti 15 A UOREi SEAfiCd PLIfZU JJEflEfTATElR! ■" 
■THE PRDSflfltt lAKfS A SET EIF ItiPJT BTEIMQ^^ PVRbE9 ALL* 
'NON-ALf[iJlCET[i: CHAJfACTERS HUT OF THEfl, ANB IHCGRPDRATES- 
'THEH iMTiJ A UOfiS SEARCH PLZZLE." 



" TIC THE COURSE OF llflKIHB THE PIHUE^ THE MCHINE fifr^- 
"FIRD TJtAT IT CAN^T PUT A MRtlDULAR tHEB ANTHHERE, Mi)'^ 
"30 UILd. ASK TE^U IF IT EHDOLD START T« UHOLE PJZZLE" 
"OVER* IF TOU BOif'r HART IT" TO START G"JEftp ITPINO 'ND'" 
"HILL THRDU AHAY THAT PARTICULAR UOEE, TF THIS PEKSIST"S,' 
"TRY ELrifER GIiJIHE LfSS VORI^S DR EIOBES PJIZZLE aiflEff^lDHSi' 

PRrHitPEriir 

CLEAR 3000 

&EF FirACZ?"TtfT"'*TNDriJtIt1( 

T*fPOT "HOU HAST CflLUttHS DOES -(QdR PRINTER HAVE-;TI| 

litPLT H|0 TOl UAHT A SOUtlOH PR IN TOUT"; 1( 

IRftJT "URAT IS ro BE THE UIJJTH QF THE PUZIL£-:U:HB^ 

IF U*2<^TU mil 345 

PfilNT "THAT UILL HDT FJT IH";T*Jr C[]LHKfiS,*';OflTa JJO 

IF ll<l THEN 330 

TRPUT -THE LEilCTH"*L:IF L>ll THEU H&-L 

IF L^T THEN 350 

INPJT *UHflT IS THE milrtUH rtUtUfJr pf UOHUS Ifl THE PHZIL£";B 

IF ll>=2 Th£H 3S0 

ntlJCl *3I]RRY; THERE NJST BE AT LEAST 2 iJORH^ /■ - Of]T 3dO 

PRIHT 

mn AKL^uj^tfifH^ 

DIN UCitp3),PXTiap7^»l[?B] 
PfilBT 

pRrwi 

IRfLT £Ti 

PtTNT "OH . * . EATER A UDRD AT EACH 
PRIHT "TO tEOIJ THE FREVTOU^ UOff&p TTPE 
PRINT "HHEH YDH RON OLT QF 4WK^ TIPf 
FOR T'1 TO H 



"^NOU EMTER A HEAHIHG THAT UILL 
"C^ITUj^CHAflACTERE NAXINLN! >' 



BE PBIHTEl AVER IJIE PUZJlts- 



QOESTIOM HARK." 

A HYPHEN t'U* 
A PEREOIl i^t^** 



5fl0 
SIO 
5?0 
925 
92? 
9T0 
9^0 
350 
3dO 
5?0 

nao 

d40 
J&«S 

AID 
i20 

tii 

A 40 
A90 
ddO 
i^BO 
dH5 
£?0 
7fl0 
710 
?l^ 
730 
^40 
?50 
7AD 
??0 
7W 
BOO 
H10 
B20 
H30 
0J2 
834 

ej6 

R50 
?40 
B70 



4S0 



INT-UT THIF ?*=■-■ THEH|i|-1|pRinr 
If I3>\" rHEA h>i-1:QDT0 660 



■REDO "rUt1I>f*, . --iGfllJ] 400 



?D0 

910 

^JO 

?40 

950 

97^ 

975 

9B0 

9?0 

1010 

^13 ?0 

1021 

1fl?5 

1030 

1040 

-roso 

10^0 

i6n 

10BO 
10T0 
1100 
1110 
1120 
1^0 
1S33 
IMO 
1150 
TI40 
1E7II 

neo 
ii?o 

1700 
12t0 

1E20 
1230 
T240 
1230 
1J40 
1270 

i2ao 

12^0 
1300 
13tO 
1320 
1J30 
1140 
1330 
13^0 
0% 



if J_EHCI*1=0 TtfEH fRIHT "liTflfT ERROR; REDfl:'^:G0IO 480 
J-1 

l£*^H[Bt{TipJtl>-IF TE1>="a" AND rE*i="2" THEiT 370 

If T£*(-A- DR TE*>"Z" TJJEIf 53 D 

T »^ LEFT! C If p J- T f -fCHRt ( ASC ^ ft |^t f Ti , J, 1 ) I+33J-+R ICH T 1 ( Tt - LEtIC Tf |- J ] 

IF TE*rTl TJIErt T*="-i OOTD 500 -^- - 

IF J<EN(T*? THEN Tt=J_EFTHtt^J-1 ? iflOTO 580 *-*tG0T057O 

If J^l TifEPf T*=EIGHHCTIpJ.EHaiJ-1):J=J-l:G0T& HJfl 

T*^LEFJnTi^J-T]tEIBHT*aJpLE"<T<?-J|;i^J-1 

J=J*1ilF J<-LE«CTt> TNEH 320 

PRINT ---JTI;**-- 

IF LE4(CT4><=ND THEH A10 

PHlflT -THAT'S TOO LONfl^ ] 'H AFRAID. "f 

PRIHT " TRT ANOTHER DilE:":6flJ0 4BQ 

F^TR IZ=-] TO I-l; If UtaZJOTI THEH HFXTt6OT0 ftJO 

PfilHT HVOU EHTERES THAT OJlE M.READT. TRI AHOl^R^^^lBOTD 

m[ij'=Tt 
NEur I 

PRINT -TRAILS lT.,,*;Nr^U0RD5.' 
PRINT "HOH Ur HE PDHIER TNTS,*,„** 
TOR [=1 TO H-l 
FOE J-L+1 TO It 

IF LEJfCHKU? < LEHllrtfJ^} iHtK HIt=nH C 1 3 :«a J'Ul (J 3 :U((J)=H« 
HEITiHEXT 

FOE III TO SPREAD BXTClp t l^DJitll^J^fl^EKT 

FM I=:| TD 28:EEflO DB13];HEXT 

IiATA Op1,l,lj1pOj,^1,Op-1,-lp-1p"1^0p-lj1 

OATft 2,4,4pe,2p4p4,flp2,4,4,a,2p4T4TQ,?^^Tip8p?t^tiiB*fr3p5,7 

FOR r=1 TO B 

LM'LENlUlrll} 

NT»0 

SII=|]0[rflAf28>) 

Si:*FHA<UJ;I1=SK*CLR-n*&HTf3Dp15:lf XK1 OR j11>B TNEH 

5T=fHACL>:X1=ST*ail-1f*BIT<SBp2f:/f 'i\ii tffl Xf>L TTIEH 

HT=t<rt|;[f HT<>L*Lt? THEN 330 

fRIHT -CDDLDH T FIT '-^UtCI);"'^ Vi TIC fUi^EJ,^ 

iJfPUT "DQ TOO UANT *IE TO 5TAET OHER^JA* 

If LEflHAIpn = "y" THEH ?aa 

tJi<n = "":B0TO 9S0 

FOR P=l Tfl Ltf 

IF LfBlAirJ^Kn ANH AKJpKK>HIB1CUKI^Ppt] TH£H 7?0 

J■Jt[^^<SBp25:^l=^:+■Il^(S[^p1^:l(EXT p 

j=sr:K=si: 

FQR P3| TO LN:A»fJpi!}=cNIDt{U|CnpP7]l 
J"Jt-IIXTCBIi,2kR=KtBj;TC3IlTl):H£lT 
NCI, ll=SX:OapI?=Sr:lJCl, 35=50 
HEUT J 

FOR r=t ra l 

fOR J-1 TO U 

[F Aia^J^^'^'' THEK A41I,JJ*Cl^fif^FNAi7^5l9i] 
NEXT; NEXT 

FOR E^l TO H-T:FOR J=l+1 to ft 

IF* U»(IH=lf}U5 THEN IQ3Q 
HZI=Utl E t ;tf»C I ^''Ut CJ) :tl»U3=^HZ» 



7V0 

79^ 



cRZ=HCIpK^;lJapKJiiHU,Kh:UCJpi;?-H2iREXT I 



I 

ftAttT COPIES OF THIB PDZZLE DO TOO UAHT";N 

EACH COPfp HIT RETUEl! TO BECIH PfiIHTIHG,„* 
H^EOSHO r070lJIEKT:[iaTD \23a 



■'J:0OT0 1140 



FUR V, = ^ Tfl 

INPUT "HOU 
PRINT -fOH 
FOE t'f TD 
[HPJT A1:PA](rT 

T^aV-2*OJ/2:PI|IliT 

PRIHT 

PEIilT TABCaU-J_ENiXVl^J,^2h;STi 

PRIHT:PRIHT 

FDJl J=1 TO L:PfiIHT TABCTJ; 

FDR K-1 TO tfilf flStJ.K]^'*.- THEN PRIHT 

PRINT CHR*CASC|AKJ,i:i]-32?r" ^ 

HEJ1T:PEIHTsfftXT 

?R]Nl:FRIHT 

PRINT -FIHB THESE RIDKH U8RB5 IN THE ABOVE PLZZLE;" 

PRINT 

FOR J=1 TO H:1F LEH<UHJ)5 = THErt 1210 

IF PDSCO^ t LEl*[t1fJM > TU-? THEN PRIHT 

PRIHT U4{J>p 

NC K I ^ P JT [ffT f PR I N T : PR LitT iPRII^T 

RETDJIN 

IF LEFTtai^ I >'***■ OB LEFTtCX*-1J-^y* THEH 325* 

ENB 

FOE 1=1 TO HFOR J=f TO J:AlfI^J?=---:l!E(TJ:H£;ITT 
FOR |i| TO H 

LHxLEHC0ICI]||J>|JCI,2I:S^Ua.n 

FOR P-t TO LH 

A1CJTKf=HI0f1|naJTfp1J 

J=J-^IJT^U[I^3)p^5;K=^^tJSKTCUCI-3).1)^tlE^ P 
Nf JT [ 

IT*^-H£RE IS THE AHSVER RETi" 

OOEtl» 1070 

PR I NT: PfilHT 

ENf 
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wumpus I 



Th« Genesis of Wumpus 

Two years ago I happened by People's Computer 
Company {PCCI and saw ^ome of their computer garner - 
auch as Hurkle, Snark, and Mugwump. My reaction was: 
''E£CHU" f ach of these game? was based on a 10 x 10 giid 
in Cartesian coordinates and three of them was too much 
for me. I started lo Ihink along Iha lines of: "There has to 
be a hjde and seek computer game without that {sxp. 
deteted) gridli" In fact, why not a topological computer 
game - Imagine a set of points conrectetT in somEway and 
the pJayer mou« about the set via tha interconnections. 

That afternoon in meditation the phrase "Hunt the 
Wumpus" arrived, and Wumpus was born- He's still a bit 
wague in physical detail as most dedicated Wumpus hunters 
know, but appearances are part of the game. [If you like, 
send me a picture of your version of a Wumpus. Perhaps 
friendly Dave, our editor, will publish the best one in 
Creative Computing.) The grid I chosewa? the veriices of a 
dodecahedron - simply because it's my favorite Platonic 
sorid and once, ages ago, 1 made a kite shaped IJke one. The 
edges became the connecting tunnels between the caves 
which were the set of points for the game, 

iWy basic idea at this time was for the playef to approach 
the Wump^iSn back off, and come up to him by going 
around the dodecahedron. To my knowledge, this has never 
happened,., most players adopt other strategies rather 
than this cold-blooded approach. 

Anyway . , . how to gel the Wumpusl How about an 
arrow which couid turn corners as it gees from room to 
room. Let the hunter tell the arrow where to go and let it 
fty. The shortest round trip without reversals is 5 caves — 
and thus the Crooked Arrow. 

Hmmm . . . How does one sense the Wumpus? Ifs dark 
in yonder cave, and light would wake him up. If one gat 
one cave away, the wumpus's distinct smell would serve as a 
warning. So far, so good ... but Wumpus is still too easy, 
so let's find some appropriate hazards for the caves- 
Bottomless pits were easy. Any imaginary cave would 
have a few of those around the place, Superbats were 
harder to coma by, it look me a day or two to get that 
idea. The Superbati are a sort of rapid transit system gone a 
Jiltle batty (sorry abouT that one). They take you a random 
distance to a random cave and leave you there. If that's a 
pit or a Wumpus, well, you are in Fate's hands. 

Around this time, I saw that Map-making would be s 
regular activity of Wumpus-huntars, I numbered the caves 
and made the scheme fixed in the hopes a practised player 
might notice this and make hlmseJf a permanent map of the 
caverns, iAnothar unrealised hope - as an ejiercise, make 
yourself such a map on a Squashed Dodecahedron). 

To start the game fairly, Wumpus, Hazards, and Hunter 
are located on different points at The start of the game. 
Each game starts with rartdom choices of location, hut The 




Dodecahedron 



hunter may restart with the same set-up if he chooses. This 
allows re-plays if the hunter, say, fall into a pit on the first 
move. 

Wumpus was nearly done in my mind . . , fhint to a 
games-writer: Have a clear notion of your game before you 
start coding it. This saves MUCH confusion,) yet I felt it 
was a bit dull. Once you found the Wumpus an you had to 
do was shoot ii. To fix this, the Wumpus was given a little 
life. It you shot ^n arrow or moved into his cave, he woke 
up and chose to move to a neighboring room or to the same 
room (one of 4 choices). If you and the Wumpus were in 
the same room after he moved, he ATE YOU UPfl 

Around here I noticed that the pits and the bats didn't 
atfact the Wumpus. To explain this, I added some color by 
making him heavy and with the legendary sucker feet. After 
all, evolution works in strange waysK If you are a Wumpus 
fiflnd.make a version of Wumpus in which heavolds pits and 
Buperbals can carry hjm only one room (with the posslbifity 
of being dumped into your cave). This can he done by 
making the wumpus moving procedure a subroutine. 

I wrote Wumpus and dropped It off at PCX:, Then I went 
home and dreamed up Wumpus 2. 

The Birth of Wumpus 

Around a month later, I went to the Synergy conference 
at Stanford, where many of the far-out folk were gathered 
to share their i/isions of Improving the world. PCC had a 
few terminals running in a conference room and I dropped 
by. To my vast surprise, all of the terminals were running 
Wumpus and scraps of paper on the floor with scrawled 
numbers and lines testified that much dedicated Wum pus- 
hunting was In progress. I had spawned a hit computer 
gamBlll 

Laler, PCC published Wumpus jn its newslelter. and 
Creative Computing published It in ihelr Sep/Oct 1975 

issue. 

Wumpus and this writeuparetheproductsollhe talented 
and creative Gregory Vob. 
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UJJHPJS 
CPEATtVE CQffflTFEMG MflftRISTJjtMr tiEU JEf?JEY 



9i*l>0r Off tfDVE <5-rtlT n 



JifSTROCTIONS C^-tthT t 
UELCBht Tfl ■'HU*!! THE ^limPJa-- 

tHE tlUHFUS LIi^E? IN A CAiJE Of 2* ltini», EACH RDEM 
H« J TUHiieL5 LEfl&IilS TD OrHER ItOOHS. (LODK ^T A 
DDDECAHE"l(:ON Tt aEE HOV IHI5 UJIffSE-IF YQU MN-'T klririHi 
UHAT- A ItlltECHAIlftQM ]^, ASr SOMEDilE^ 

fltTTEiJIlEiSi ?rT¥ - TWO ROBttS »*■?£ MTTOhLESS PJTB IN T*fCH 
IF TDU SJ] TMEGE^ rOU FALL INTO THE 911 [I LOSEi) 

SBPER^AT? - TUO DlHEff RDDN3 NAVE SUPER BATE. ]F Tl>U 

GO THERE, A UJ GRABS laU AND TAiTES TOU TD SI^HF QTHEA 
BODB AT tftNUDH, CUHIDH niBHT frE TRAJHESDrfE^ 

UUflPiJSl 
THE ULIMPUS [5 RDT BDTH£RE& fT THE HftifiHHS (HE HAB SUCKEft 
FEET AN[r 15 TQQ FIG FDf! A BAT TQ LEFTl^ USLlALLT 
HE IS A9LE£P, TUO TRINGS THAI VaKE KIK UP[ TDUfi ENTERING 
HIS HDDA CR t^UR SHEtn'TNl] A^ i^RflOU. 

EF THE IrUNPtfS ypiKES^ H£ iiOVES {P=>.733 QiJE tQQfl 
OH STill3 3TELL <F=.253. AFTER TNAT, If HE IS UHERE TOU 
4^R£p HE EA1S 10U OP li TOO LflK!) 

roit 

EACH THEH YQU HAV HQVE OR ^KQ^T A CKCDtEI} ARSflU 

flOviNo^ rnu CAN bq dne rqan {tmru une tijmhel? 

ARR[?US; TOO Hfti^E 5 ACRDUS. TOJ LDSE UHEI^ YQU RU^I DUT. 
EJ^Cff AREJTU CAil GD FRflit 1 TO ^ Al^DQ^. TDU AlZf Sr TELLEtffi 
THE I^DHPlrTER TThE RDOAIS TIU UAifT THE AREOU TO Gfl Tfl, 
If THE ATRCTH tAr^ GO ^^Al UAV 1j& NO TUHHELh 17 H0VES 
AT SAH&Qfl rO THE f^EK- ROBH, 

TF IKE ARJTQII NITS THE UHHPUSp TQO LIN. 

IF THE ARRQL NITS tOUp TCU L0^« 

UARNINEB: 
UHEK ruu APE (M T^ron AllA'f FRQH UUNPU^ OR HAZAVBt 

IH£ CDHPUTEE SATS^ 
LJirqPJS- 'I SHELL A UUHfUS^ 
BAT - ^ Bills itEARBT-' 
F-IT - i FEEl * DftfT^ 

HUtTT THE UUNPUS 

lATS flEftflfir- 

VDU AJtE IN ROBK 7 

TUtfNELS LEAB TD ^ 8 17 



VQtl ARE IM RJIGK 4 
TlilNELS LEAB TO 3 5 T4 

SHflDT []fi none CS-Jl?? n 
UUEftE TBT 3 

] FEEL A DRAFT! 
TQU ARE IH RDDH 3 
TUHUELS LfAlr TD 3 4 12 

3ifB0T DR ttDfE CS-HJ-^ R 
UifESF TB^ 12 

I SnELL A UUftPUSi 
voir ARE in EOflll 12 
TUNNELS LEAB TQ ] 1 ] U 

SHDQT DE NOVE CS-tf3T S 

Hfl. OF lTDClff5lT-5]-7 I 

B90H HT U 

AHAi you l^OT THE VUNPUS^ 

tiEE HEf KEE - THE JUWUS-IL OEICKA mXT TIHE1 




SHDDT DR HOUE C9-H^? N 

WHERE TD^ B 

iflP--SOPEir aST SMTCHr ELSEUIIEREVILLE Fftfi TflU! 

] FCIL A IRflFTI 

T9LI ARE iH naoH :{i 

TUNlfEL^ L£A[h TQ -lA li If 

SHDOT OR HQl^E lS"R>r fl 
UHEAf TD^ 13 

fOU ARE IM RUaq 1J 
TlllfNELS LEAH TQ U i4 ZO 

i3tf|fcCT QJt HOVE C5-H1^ H 
UHERE TOT 14 

too ARE IM RDHH 14 
TIMNEU i.EAB TQ ^ n IIF 

5?ldnT DG nOwE CS-tfJ? H 
UEJERE TCr 15 

: FEEL A BRAFT' 

Y9I1 ABE IH JtOOH 15 
TJNHELS LEAB TD 4 14 1A 

SHQOT DR HOVE fS-ni^ 4 
SHOOt OR JfOVE CS-H)f H 
klH^RE TQ^ 6 



TJU ^Rt IK HE 
TJUttfL^ L^A^r 10 



7 15 



SHUOT flR^HDVE fS-l>T ? 
3HD0T flfl hQVE IS-BJI H 
IIHEEE TD1 3 

TOU ARE IJI RQDfl S 
TIFNi^LS LEAD TO t 4 



LIST 


JO PfirHT lAtr33I;'UJHPSS- 


2D FftlHT TABC]55;-CflEAT!1ir COHPOniPQ HBERISTDON, W 


2? PJHUT 


24 FRIIT 


2i PRINT 


3D PBINT "INSTRJCriDllS £T-H)-; 


W mPOT [| 


5fl tF [*=*«■ TREII it 


33 eOSJt 1000 


£C RErt- SET UP CAVE C nOBECflHEBRflL NODE LIST? 


7S JIH S[20t3^ 


90 FDR J=1 TD 20 


9» FOG 1^1 ro 3 


1>C READ SUpKh 


11B NEXT H 


12? NEKT J 


(« BATA 2p5,e,1p3^tfl,2^4J3,3,5,H,C,4,i 


140 BATA lp^fl3pi,aTS?,lT?^^tai1l>.ia*2-'pl1 


3(9 BATA t0,lZ,l?p3Tl1,l4plZ^f4t20T4J3Tl5pdJ4pT6 


I41J M:-^ 13,17,2lJ,7^!ii,1ia,V^l/^59,n tS.20.13-1i.t9 


1^0 DEF FHA1]>-IHTC204RN[)MMM 


ItO DEF fMBU^^[flTC3*HHt(l))^| 


190 DEF FifClX3^1HTC4*RflD{l)h1 


iDO REH- LBCATE L AfiRfil IIEH3 


aH> SEN- l-T0U,2-0UHPJJ5p3l^-flTg,516-MT5 


220 DIN LCJ3^N(il 


^3CI FOR J=1 TO i 


240 LU]>FMAf9) 


240 H(J]<iJ> 


2?0 NEXT J 


2<0 REH- CHECK FOR CMMOUERS IK HI 5-LC3) ETC? 


2T0 FOR J-l TO i 


300 FDA KFj 10 4 


310 iF JiiX THDI 33fr 


Zlt if J-U^i^LCK] ThIEH ?40 


33* H£j;| K 


340 JIE3T J 


m FTEH- 9ET4I ARROS 



JERSEI' 



^£{1 

J?ii 

375 
3?Q 
395 
4PD 
41D 
4?D 
430 
4^C 
450 
IdO 
4?D 
*B^I 
4i1] 
500 
510 
520 
530 
5^0 
550 
5AI^ 
5?D 
5Si> 

i^^ 

dIO 

1l^0i^ 
1i}fO 
H]20 
fOJO 
I0qa 
1050 
106i> 
107D 
KQD 
1D90 
1100 
1110 
1115 
TUO 
HJO 

ini> 

115i> 

]U^ 

1170 

11 JO 

KTO 

1200 

1230 

12ZI} 

123D 

1240 

1J5D 

12frO 

12?0 

12?5 

t2S0 

13¥0 

12^5 

UO* 

13f0 

13^0 

1!30 

TJ40 

135^ 

UAD 

1371J 

]3&0 

13?0 

I41}0 

1410 

2010 
202U 
2030 
2040 

120^0 
2U^ 
2i]70 
2fl8q 
2a?0 
I^IOO 
2110 
2120 
2JJ0 
2140 
2l5fl 
2FdO 



■f" 



390 



395 
550 



A -5 

L"H1] 

R£N- RUiJ THE Ol^itfE 

PHHT "HUflT TH£ IflJNPIT^'* 

RE A- HA^AJtO UA^NINGij 2 LQCllTfQMB 

[i09U9 2l}00 

ftEfl- J*DU£ an ShOflT 

603 JE 2500 

On J^ GDTD 44Q 

&En- SKQOT 

QirSUB ^000 

If f"0 TilEM 

DQTQ 5<i0 

IIF*1- *ia"/E 

IF J="0 THEK 

JF F>0 TrtEH 

REH- LOS£ 

PSfNT "Hrt HA M " TDU USE 

QOTO 5^0 

REIV- UIN 

PRINT -NEE ttEE 

FOfl J=3 TO i 

NEXT J 

Prr[HT "SANE 9€T-llF 

3JifUT It 

If LI <> '*i" TPEH 230 
GOTO 340 
fiEH- ]*f5TRlCTIDtt5 
PmHT "UELCOrtE TO ■'HUNT THf ilUPlPllS"'" 

" THE UllHPUS LJUfS IN A CfiVE OF 20 IrQOftS, EACH 
"rtA5 3 TONNfL^ LEflHifG TO DTnEP R[)[fM5 . aOOK liT 
"ElDIlFCftHEIiRilN TO 5£E HD4f THI5 IfOftKS'IF VQLj BflN-T 
''UHAT A HQStCNAfiAQH 15^ A£K £QA£0NE^" 



MEE - TH£ uypiFUS'LL CEFCHfl flEXT Tliltir 



(f-HJ"; 



PftlNT 
PfiTNT 
PRINT 
PRINT 

FAIffT 
FAEJIT 
FRI*JT 
PRINT 
PRINT 
^RINT 
fRINT 
fRIHT 
PRIKT 
PftllfT 
P(rE*iT 

PRI^T 
PffiNT 
PRINT 
fftINT 

PRJKT 'AREt ffE Ei^TS tOJ UP iA TOU IQSEIi 
FflJJfl 

Plrmi " 

PGJilT -Ej)i:h 
PKIilT " 
PRINT " 
PRINT " 
PRINT 

fum 

PRIflT 

pfraflT 

PfllifT 

PIlJEtT 

PRINT 

PRINT 

PRINT 

PRI*^T 

fR]HT 

PFrlUT 

FGtifT 

PfllPtT 

PflJNT 

RETl^JTN 

REM- PGJNT 

PRINT 

fOfi J- 7 T9 i 

fON fcr=3 TO 3 

If 5a(1?,K]OJ.CJh THEU 2110 

DM J-1 OQTD 2040p20RO^2a90t214Q721OO 

FSI«T -I SHELL A UUflPUSI" 

60TO :eio 

PUJifT "I FEEL A DftAFTI" 

SflTa 21 ID 

Pfi^NT "BATS NE:itBVE*< 

NEXT K 

NfKl J 

PRINT "YOU ^E IH AQDn ";L[n 

PRINT "TUiiNELS LEAD TO ";a<l,l J^StL,?] ;SrL,J) 

^RINT 

fiEURlt 

CtM- CHOOSE OPTTOir 



RQOH' 



KMDU' 



TUfn- 



HiiiAftliJ:" 
"£fllTl]flLES& flTlS ' TUO HODttS }^Wl BarT0HLE9S PITS IN 

JP TOU 03 THEtEj fflU TALL IttTO |J<E PIT CI LflSE I 
"SlIPERBATS - ISU) OTHER ROOH? HAVE StlPE*: firilS. [F TOU" 

GO THEftEn A BAT OJIABS lOB AM TfiKES [QLl TO S0i4E 
" OTHER" 

ROOM AT RAflron. fVIICtf rtlQHT IE iRflLTBLESONC J ^ 



^"HI UONPUS IS HOT HQTHfJlE* ff THE HAZflRffS [HE HAS SUCKFH^ 
"FEET AffD [5 TOO B[£ fOfi A BAT TD LIFT^ USUALLY^ 

"HE 15 ASLEEP. TUO THINGS THAT WAKE Hlfl UP; TOUR EKTERIHG" 
"HIS ftQflti DR rOOR SHDDTINO AN ARRCU." 

IF THE «UflPtf5 JAKESp KE NUVES (f=.?S5 QnC RQCIT 
^[fR STftTS STILL CP = ,23}h AFTER TriATp IF HE 13 i^HERE TOU" 



V0U1- 0^. ._^ -^ .- 

TURil im flAT ttOyE OR grtflOT A CBOOHEB AfiROU" 
iDVIItG: TOU Cj^N QD QiTE RDOH C THRU 0I4E TUNhEL^ 
ANAOUS: TOU NAVE 5 AglTO^fa. rotj LDSE UtfEH 701 RITH 
EACH ARflOO CAN GO fROtt 1 TQ 3 ICOOflS. YDU AlH BT 
TELLING" ' J- - 

THf COHFUTEfl TTHF ^OOftlS "fflO UANT THE ARRGO TQ &□ 
IF THE ARROV CAN-'T OD THAT tJAt (IE HO TIHTNEL] IT 
ffOVES" 

AT flANDOft TQ THE JIEXT ftOOH^^ 

IF TJie APRDU HITS THE HUPIPEJEp TOO Oltf." 
[I THE ARRDil HIT3 fQU, mu LDE£.'^ 



OUT.' 






10-' 



■^OliflPHS- 
■lAT 

"PIT - 



UARNINGS;'' 

UHEH rou AK src 

THE COBPtJTEfi SATS 

-'I SriELL A VUHPUS^ 
'BATS SEAflBl" — 
'I FEEL A DRflFr- 



RUSH AUAI ^fton UtlHFO^ Off tUZAflP/ 



LOCATION J HAZARD UflftNIHBS 



253 

2530 
2540 
?^^0 
?540 
?370 
25S0 
3000 
3i]t0 
302O 
3J)30 
JO^O 
3050 
ZtiO 
3071 
JflSO 
3fl?0 

3300 
310? 
3110 

ins 

JTSlf 
3t40 
3150 
JldO 
3170 
3IBi} 

3200 

3^1 

3^20 

3225 

3230 

324D 

3250 

3255 

32^0 

32?0 

32S0 

J?90 

32?5 

3300 

3J10 

3320 

33 JO 

3340 

3350 

3360 

3J70 

33^0 

3J^0 

3400 

300 

3420 
3430 

3140 
40130 

4010 

^420 

4030 

4D40 

4Dt(0 

4D^0 

4070 



'SHDOT 



OR Houe (s-xr 



PHI if I 

IJIPOT 

If II O °S' THEN 23W 

0=1 

RETUfiff 

IF It o "fl" THEH 2510 

0=^J 

RETURN 

RfH- AlrROU RDUTIWE 

FO 

REfl- PATH Of ARHOU 

L=LnJ 

PRINT "NO. JiF RDansn-5^-; 

rNPUT J9 

IF J*<t OR J??5 THEH 3040 

fJlR K=l TO J? 

PCiNT "RDOn U"i 

(HFUT FtK^ 

[F K <= 2 THEN 3115 

IF P(H] <> PCK-2} THEif 3M3 

FRIHT -ARPOUS AREJI-'T THA TCOHfiKED - TfiT ANOTHER ROQH 

£OTJ^ JOSO 

lyEXT E 

fiEH- SHOOT ARirOU 

FOR K = S JIT J? 

FQir i:i-T TU 3 

IF SapJrn=PfKt TffEH 3?« 

NEXT HE 

FOR ARRITf^ 



IS AT Ln? 



LC3} 



TOU J' 



409O 
4100 
4lt0 
4120 
4130 
4140 
4150 
^lAO 
4170 

41 ao 
^t?o 

4210 

4:^0 

4230 
-1241^ 
4250 
4jfrO 
1270 
4230 
42¥0 
^300 
4310 
MOO 
Qk 



PEq- NO TUHNEL 
L^SlLprNBCm 
GflTO 3300 
NEH K 

PRINT "fllSSEB^' 
L-Lri> 

HE^- MGUE ilUttpLlS 

ODSlfE 3370 

REH- ilNMO CHECb: 

A=A-1 

JF A.'O THEN 32)ji? 

RETJRR 

REM- SEE If ARHOkl 

L=P^K? 

tf L O L(2^ THER 3340 

PRINT -AHA5 TOU 601 THE UDflJ^JSi 
F^l 

CETURit 

IF L <> LM) THEH 3?10 

purecT "OUCH! arjtqij got rau"^ 

GOTO 3270 

REK- ftO>^E OUHPUS R0UT1N£ 

K^fNCCO^ 

IF K=1 THEfl 3410 

J-[2>=SCL{2J^H) 

IF L[2i <> L THEN 1440 

P*JtfT "TSK TSIE rSK - UUJ1PJJ3 0OT 
F-l 

RETURN 

REft- HOVE ROUTINE 

f=0 

fRIHT -WHERE TQ- ; 

IKPUT L 

If L^l Dfr L^a^J THEH 

FOR i: = 1 JO 3 

REH- CHEC*: If LEOAL 

IF Stl(l?pK)=L THEN 

MfXT I! 

IF LH^If THEH 4IJ0 

FRfflT "NOT POSSIBLE -'; 

GOTO 4020 

R£H- CHEC*! FOft HAZAfiUS 

LUJ^J. 

REft- WURPOS 

IF L <> L12J TKIT 4230 

fRr»r "... GOPSi BUHPEJ) A iiunfusi'" 

BEN- HOV£ UUHPU3 

eOSOR 3JH0 

IF f-0 THEN 4250 

RETUB)J 

REfl- PIT 

IF L <> LfJJ AHD L <> J_(43 TKEN 4J70 

FRTJtT "VVTIIIIEEEE . . , FELL IH PIT 

fi-1 

RtTORN 

REN- BATS 

IF t O Lf5> AHD L O 

^RINT -ZAP -50PEfi DAI 

OSTS 41 JO 

BETORH 

EVB 



4030 

HUiJE 
413D 



L<4] THE* 4310 

StfATCHi £LSeUH£R£yiJ_LE FOR 



Tour 
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Wumpus 1 



^ 



Hark If The weary Wumpus huntsFr wartfrofn &0 days in 
the Terminal Caverni, ^xh^usted and uuilh all of his arrows 

expended — (A groaning Teletype roari at 9 sleepy 

student. Maps litter the floor covered v/ith circles and 
integers. With call used fingers, the immortel Rumpus player 
looks up with b^ood$h^ot eyes and implores: "How do I get 
ocitof here?") 

I suspected Ihat the dodecahedron mey prove a bit 
boring after a few thousand games^ so I wrote Wumpus 2 to 
extend your pleasure. Some of the more mathematical 
minded may heve noticed there are lots of way^ to link 
caves with three tunnefs apiece. Some of these patterns are 
lopolDgically interesting 

Wumpus 2 is the same old Wumpus In different settings 
- Including those of your own design. As you play in the 
different caves, you will notice that the flame changes in 
difficulty and strategy. PJouv lo a description of the various 
caves in Wumpus 2- 



CAVE (Dodecahedron} 
Thi5 is the same old 

familiar. 



^iVumpus with which you ara 



CAVE1 (Mobus Strips 

Sinc^ my original vision was topological, here is the first 
wonder of topology, tha Mobius strip. Take a strip of 
paper, give it a half-twist and join the ends into a toop. Tha 
result has just one side and cpne edge {H you disbelieve, take 
a pencil and c|0 around the thing) h 

A perceptive player will note that the placement of the 
pits influence the game. Two pita placed just right (around 
b% of the gemes have this) wiM force a detour back eround 
the strip In certain cases. Getting around is slov^rer than In 
Cave 0, but it is easier to search the placa. 

CAVE 2 iSthng of Beads} 

See the diagram for this one. Here, placement of the prts 
will often make parts of the caves inaccassiNe except by 
b&t-es press. (Can you see why?] Play in this cave & 
frustrating until you hav^ gone to the trouble of making a 
reference mep; otherwise you keep coming back to your 
^rting pointn (Look ^t the diagram and see how this m^v 
be so J 

CAVE 3 mex Network) 

This J5 my attempt at a torus (doughnut). If you can 
visualise a hexagon net like a honeycomb or a tile floor and 
stretch II onto a doughnuts youVegot itil The drawing tries 
to show this, but if you prefer^ think of it as a complfcated 
molecule of same sort. Play in this ofw is very simiiar to 
CAVEO. 

CAVE 4 (Dcndritel 

Up to now, each tunnel leads to another cave and only 
or>e tunnel connects a pair of caves. This need not be a 
strict rute and the next two caves ilfustrate variations on 
thisn Tha deodrita is a branching pattern like a free or a 
plant. At the ends of the plant are "leaves" which are caves 
leading to themselves or multiple tunnels. This cave Is 
especially susceptible to severance by pits and getting stuck 
in corners near the wumpus. A nice thing 1^ that you often 
wilt know exactly where the Wumpus is when you coma 
near hlm^ 



CAVE 5 (one way streets* 

This is The extreme examr^e of all tunnels are one-way. 
You will find that getting about this cave is like travel In 
Los Angeies - much going to gel to the neighbor's house. If 
you overshootr you must travel all the way around, just like 
missing a freeway offramp. 

CAVE 6<Do YourOWN) 

Draw up a map of caves, each cave with tunnels GOING 
TO three (exactly three) caves {same or different). Then the 
computer ^111 ask you for the numbers of the destination 
tunnels for each of the 20 caves in Wumpus. When you h^'^e 
it enteredr pl^y Wumpus on your own caves^ Let me know 
of youf favorite ones, and your most frustrating onesiJi 

FINtS 

In any case, Wumpus has spawned several versions and 
spread about the computer games-dom really nicelyn For 
myself, the soul of the game is in the idea and fun of it 
rather than the program or the computer which hosts it. I 
feel that all really good games wiH turn programmers on 
enough for them to write it for their system from the klea 
alone and encourage games writers to think carefully on the 
art and Ksthetics of iheir games before writing a line of 
cod«, 

UVuinpu3-2 and Ihis description are products of Gregory 
Vob They appeared previously in Creative Computing, 
Jan/Feb 1 976 and Ihe game in Peopt&'s Compul&f Co, 
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JCDHRISTQUlf HEU JERSEY 



IHSTftUCTlONS* tE3 

UELCDflE TO UUHPU3 II 

THIS UERSIflK HA9 IHE &Aft£ RULES ftS 'HUHT THE U^W1Pl*S^ 
HQUEVER^ TOFJ flOU HAUE A CHOICE OF CaUES TD PJ.AY IM. 
SDlIf CAVES AfTE EASIER TIJAN QTHERS. ALL CaUES HAVE 20 
HDDHS AN! 3 TlJNilCL6 LEAJlHe FRflff ONE ROOft TQ OTHEB fiOOtta. 
TilE CAVE3 AJfEi 

D - [»QD£CAHC(flON THE AdOHS 0^ THIS CAVE AKE OK d 
1!-a!nED H&JtCTp EAfH fOl+HINfi A fEtttAflOr*. 
THE RflOft^ JlRt AT THE CDMEBS CF THE PEHTAGflUSn 
EACH llOOH hnV[NO IIJtfHEJ-S THAT L£A[t ID 3 OTHER ROHnS 

1 - HORIUS STRIP THia CAVE IS ThQ ROflftS 

BlDt AMI Id RllDHS AROUMP [LIKE ft BELTl 

Tflu ifTiL nancE there is a half tujst 

SQUEi^HERE. 

2 - BTfrlMi OF BEADS FIHE BEjlIlS IH ri CIRCLE- 

EACH BEAU JS A DIAHOHD UITH A VEGTIJIAL 

CR^5S-SftR- THE RlfHT I LEKI CDiLHERB LEAH 

TD HEIGHBDRLRG K^U, [JWIS OHE IS IUFFICUtT 

TO PLAO 

J - HEr NEUORK IHAElPfE A HE?! TRE FJ-DDR. TaVE 

A RECTAH&LE 4IJTH 29 PDIMTS {IHTERSEt^J0lf3l 
l«SIBE (4M?. J014I HTflrtT 1 LEFT SI&EH TO HAKE A 
CYLIHII£R, THEJf JDIfl TD? J SOTrOU 70 FSEUI A 
TORUS (DDUCHillfT). 
HAVE FUN inAQINIflG THIS DHEi! 

CAytS 1-3 ARE SfGULAR IN p ?EPS£ THAI EACH BUD™ 
QDEfi ID THREE QTII£A RQOHS : IJtNHELS ALLOU TUD- 
UAT TtftFFIC, HERE ARU SQflE IfiRE&ULAP' CflV£SS 

4 - HEN&RITE UITtt LEfiENERflCIES PUU A fLANT FRQfl 

THE SROUJID^ THE ROOTS £ ^RAHCHES FORH A 
BENDPTIE - IE*, THERE AfiE NO LOflFIilQ PATHS 
CEUtAtfiftCT JtEAflS A) SWl HOQHS CONM£CT TO 
THEHSELVES AND BF 3DHE RQflHS HHUt FtOEE THAH JWE 
TUtfNEi TO THE SAHE OTHER HOEtfi I£, 1? HAS 
lUD TUNJCELS JU H, 

5 - ONE UAT LATTICE HERE ALL THH«LS 00 OHE 

UAT QtfLV. TO RETEJRNp TflU HUST BO AfiOOND THE CAUE 
[ABOUT 5 HOVE&?> 

£ - £IIT£R TQUR DUH CAVE THE CDHPUTEJl U^LL ASE TOU 
TEE RDflHS NEII TD EACH RQQn IN THE CADE^ 
FGH EKAHPUi 
nOOP i] T 2^i^* - TDOR ftEPL'T OF Jp3p4 

HEAHS ftOON t HAS TUHHEIS tOlHO TO RQOHS: 

2- Jt J 4- 
HAPPT HONTTNg^ 
CAVE l40-i) T 4 



BATS HEARBVi 

VJIO ARE IH ll1]flH 4 TDNriELS LEAS TC 4 i 1 

5HJ1QT CR HDVE ? H 

UHEJ^E TO ^ 4 

BATS i^fARBYi 

TDU Ab£ IM RODH A TUNNELS LEA» TO 4 4 1 

SJIOQT DR NO^fE ^ fl 

UHERE JD T A 

yah ARE IN RODrt ^ TUNNELS LEAB Tfl 4 7 5 
SHOT OR NODE T it 
ITHERE TS T S 

lOU AR£ iff ROOn 7 TOmiELS LEAD TO 2 7 3 

anOQT DR ftOvE T H 
HHERE to t 2 

VOtJ ARE IN ROOH 2 TIfHNELS LEAD TD 2 5 3 
SHDOT OR HAVE ? H 
JdHtRf TD ^ 3 

niU ATE U ffOQfl 3 TUHHELS l^AB TB J 6 4 
SNUDT OR HOiJE T n 
ITNEItE TQ T J 

VOU ARE IN ROOH 6 TUriNElS LEAD TO 4 7 S 

BlfOUT OR HQVE ? H 
UHERf TO ^ 7 



YGU ARE U ROQH 7 TUNttELS UAB TQ 
SHOOT OR HOVE * H 
UitERE TD ? tfl 



to 



HINT THE UUHPUg 

J 5AELL A OUHPUSi 

BjITS NFflftSTP 

YOU ilRF IN flWH It TUflKLS L£flB FO 13 H 12 

SHOOT OR HDVE ? S 

ND. OF ftoons ^ 1 

ROON t? 13 
HT'^SED 

SHOUT ar^ J10VE ? n 

UKEBE TD -» tj 

7Af--SUPEft BAT aHATCHI ^SEUHERE^VfLLE FDR TOHt 

YQU ARE [R EOOlf £ TUNNELS LEAB TA 4 7 5 

SHOOT QE HOVE T H 
UflEHE TQ T 4 



I FEEL A WAFJi 

YQLI ARE IN RODft TO TUHHELS LEAL TD 9 n fO 

SHDOT OR NOUE 1 H 
UHEAF TO ' Tl 

1 SHELL A UITHPOS! 

BAlS HEAfiJrri 

YiU ARE tif RDDH 11 TUN*IEJ,S LEAb TO 13 14 1! 

SHOOT DV HOVE T 9 

«0, ISF ROOKS ^ 1 
fiOOH B? 12 



AHA» rOU GOT THE ULiiCpua^ ME UAS IH ROOH 13 

HEE HEE HEE - THE UUNFUB LL SFT TOO HEJIT TIHEEI 

PLA-^ ADA IN? HO 



at 



1S2 



3 FfilItT TflfilJShruUHPUS 2" 

^ FftlJII T"lift(?Oj;"CRtfiTIl"£ CMPUTIHQ" 

5 PRlilT' Til£tiai;"JfQflR|3n)UH NEU JEftSEV'' 

? pfinr 

IQ PREiir 

1^ pfltwr 

2C R£h- UlinFUS VERSLOd Z 
311 IIH SC20,33 

50 PfilNJ "INSTilUCTIWIS^; 
^t JHFUr It 

7» rs»T 

ai} IF LEfTiCIlpI) <> "Y* THEPf UO 

liO REM- CHOaSE AilLi SET LIP CA^E 

UD &DJU? 2311} 

14Q BEF F|fAa}^IMTC20*RHD(1l>+1 

3JII DEF FflBCX]=IHTU4RN»U]l«1 

li1> DEF F*fCCX]iIflH4*RHfln5}^l 

IJ1> HEM LflCflrE L AflRli-r ITEni 

isD Ain I'Vaij, j-ulafipBt 3n-prTSp ;»-aats 

210 fOR J^l ID fi 
i2^ LfJ]=FHA(4} 
230 fllJ]-L(J) 

240 NEKT J 

^l-J REi* CHECK FOR CROSSa-JEHa IJE L{1J-=L(2) ETC) 
2&D FDft Jrl ri> 6 

27D Fat K-J TD £ 

2ffD [F J=K TH£N JUO 

29D IF L(JJ■L^KJ IMEif 210 

JDl} IfEXT t! 

JIU JfEXT J 

32^} HER SET If rtffJrDEfS 

JJil fl=5 

334 KEtl- i^lJit THE Sflnf 

340 fftlHT "Hlf«r THE Ul]flFU3" 

370 PCN-HAZAfrBS U ARMINGS AiTD LC^CATON 

3aO S05UB 1230 

390 REH ADVE DR SHQQT 

^UO EflSU^ I^OD 

^Tff QN flOTD «0p4?l> 

Ai^ REM SJIQOT 

43D eaSUB 1)5Q 

^il> IF F-fl THE« 400 

45D BQTD 4?0 

4il> REM MOUC 

4?Q CDSUE Z150 

*Bfl IJ" f=a THEN JW 

4fO If f > THEH 540 

300 REN LOSE 

510 PRINT "HA HA IW - ^OU LOOSE"" 

3:0 DaTQ 55D 

530 REil II IN 

5^I5 PRINT 'HEE FfEE HEf - THE" UUHPUS^t 6E7 TQl MEST TIHCI f" 
5SD FQE J=T TD £ 

3?D ifEJT J 

Sflfl PRIJIT ^FLfir AGftlN-; 

5f{i IHPUT It 

3f? PJEI»T 

4(0 PfrllTT 

i20 If LCFl*{JiJJ O *V THEK 3310 

i^O PRINT "SflttE SET"-irP ■ = 

ii50 TNPUT LI 

i?D IF LEfriai.n O "T^ TH£N 130 

i^^ Q[^TO .330 

700 REH- liJETREJCTIOttS 

7E0 PRINT "UELCttHE TO UUflPLJS 11" 

?:0 PRINT -TMI5 VEflSIQH HUS riffi SAtfE RULES ftS 'ttUHT THE WUHfEJB^," 

?3fl PeiNl -MDUEiiER, TOU NGU HAVE A CFfBICE Qf CflyES TO FLAr IN." 

7<0 fRIHT -SDttE DAVES AirE EASIER THAN OTHERS. ALL CAUCa HftUf ?0- 

?H> FRI«T 'fiOonS AMO 3 TlJ«*fELS LEABINfi FROtt ONE RDOH TD OTHER ROOflS^'' 

7iO PBitfT "THE CAUf9 ftREr 

770 PRINT " - &Q|lECjlHEBfi[)N ThfE IrOOBS Of THIS CALiE AliE 0* A" 

?S0 PRINT " IZ-SlftEH OfJCCTp EACH FCRtllrtlj A FEHTABDH." 

^^^ PSINT " THE ROOn^ ARE AT THE CHRHEf^S Of THE FENTAQUNS." 

aOQ PRINT " EACH RDQtt ffAVlMO TUHNELS THAT lEAl TO 3 ATttEfi flQOJig" 

BOS PRINT 

BIO PRIHJ - 1 - nOBTIIS STRI? THIS CAVE iS TUQ RMH5" 

e^^> fRIWT - UIBE AifB l<\ PiDOtIB AROLIHD (LUE A BELi]- 

930 PRlilT * TOU IfML NOTICE THFRE 15 j=i HALF TIflST" 

BIO PIlIilT • SflrtElfHEJlE*" 



2 - 



J - 



STRING OF flEABB FIUE BEAflS IN A CIRCLE/' 
EACH EfAD 15 A DIAAQlfB illTH A ^JEfiTIl:AL^■ 
CROSS-EAR, THE filBtJT 1 LEFT CORNERS LEAD" 
TO NllGBSORIHS BtABS. tTHr* ONE IS DlfFlCULT" 
TO PLAIJ' 

HEI HEUOIfK IHABTNE A HEST TILE FLOOR. TAKE" 
A RECTANSLE UiU 20 FQINJ5 CUTERSECTIOHST' 
TilSIBE MX4k JaiN RIIjHT i LEFT SlBES 10 HARE i' 
CmflDER. T*IE*f JBlif TUP A BOHOfl TO FDRH fl" 
TOfrUS ^ffflOQHHEITJ** 
HAVE fUtt IHA&I»flttG THfS D«£ii- 



S50 PRIUT 

B&O PRINT " 

fl7D PRINT " 

flflO fRIJIT ' 

8^0 fftlitT ■ 

?00 PftlHT "■ 

*F0 PRINT 

?;i| PRINT " 

?3i> PRINT - 

?*l> PRINT ■ 

■^30 PRIifT ■ 

94fl FRIKT ■ 

¥^0 PHIRT " 

980 PRINT 

9?0 PRINT " CAI^ES I'J ARE RC&UlAff Ifl A SEN$E TttrtT EACH RQOfl 

100V PJllflT -fiOES TO THREE OrnfR RflttHJ | TUNHELS ALlDtf TUO-- 

nu PRIflT -^UflT TfiiFflC- JfERE ARE SOflE ^IRfiEGtJLAR^ CAVESi" 

1D2<i FGIKT ^ 

lOJO PRIHT " 

tDqO PRINT " 

tOSO PRINT " 

1040 fRINT " 

1070 PRlflT ■ 

JOaO PBJtfT ■ 

IDffO PfllRT " 

1100 PRlilT 

T110 PRINT " 

1120 PRINT " 

HJO PRINT - 

1F« PRIHT 

lEfiO PRJ*fT - 

ll?1| PJr«T ■ 

lIBCr PirltfT " 

11?0 PSIrtT " 

1?00 PRIP*T ^ 

1210 PRINT " 

T220 PRINT " 



4 - DEIIORITE UITH HEOENERACIES PULL A PtriNT IRM" 
TNE GRBUHIi. THE ROUTS 1 BRANCHES FOHH A " 
BEHMITE - lE.p THERE ARE NO i.GQPlJtlj PATHS" 
HECEHERACr HEftHS Ai flOHE ROOMS COHtfECT TCI" 
mCnSELUES AND 9^ SOHE AQOHS HAUE ^OEE THAN QUE* 
TURNEL TO TRE SAME OTHER HDON IE, 12 ffA5 ■' 
TBa TJNMEiS TO 13," 

5 - ONE UAT LATTICE HERE AU TUNNELS GO QNE"' 
UAi 0*111, TO RETURNp VOU HIiST SO ArtDlfNIT THE i;AIJE" 



^ABOITT 5 NdVES^," 



4 - 



ENTE* TOUH QUN CrtVE THE COHF*IJTER UILL A5H IDU" 

THE ROQHS NEKT TO EACtt SDOfl IH THE CflVE*" 
FOR E^AJIfLCl" 
ROOM II t 2,3p4 - TD<m REPLY Of ?-3p^ 

MEANS ROSN 1 ilAS llfNflELS SOING TO ROOMS:" 
2, 3j i «." 
nAPFT HOHTCN^"" 



f225 RETURH 

T230 fLEH 

1240 PAINT 

1250 FOR Jfl? ro 6 

12fiO FOR K^l TD 3 

1270 IF S[L{npH3 C> LCJ> ThEH 1340 

1200 OR J-l GOTfl (5?fl,ni0p131Opt3MpT3M 

1290 PRINT "I SHELL A U4JNPUSP" 

IJOO &OTD 1340 

UIO PRINT -I FEEL A URAFir 

t3?0 BOTO 1340 

1330 PRltfl -BftTS HEAftBYl^ 

1J40 NEXT R 

IJ30 NEXT J 

13tO PRINT -TOU ARE IN ROON "ILCUJ 

1370 PRINT " THNBEie LEAH TG ";Sa,1 ];S(Lp?j:&a.i] 
1300 PRINT 

13^0 frETURH 

HOO JfEN- CHOOSE OPTION 

1410 tiOIO 1430 

1*20 PRINT -ERROR 'J 

143V INPOT Z? 

H40 PfiiifT ■■"; 

1^50 PRINT "BftflOT OR NO^JE ■; 

1440 INPUT II 

HJO PRINT 

14?0 IF L£nja*,l3 <> "5" TFiER 1520 

1300 0=] 

151 & RflllRrt 

■\S!<\ If LEFTICIIpD <> *H- THEN 14E0 

1530 0=2 

1S40 RETUPN 

1550 REN- ARROJJ RGLITIHE 

1340 f=0 

1570 REH- PATH OF AtfiBU 

is?i} SOTO ^&li) 

UOO PPIJfT '^ERHOR "; 

IdIO INPUT £f 

lAJO PRINT ■"; 

1630 PRINT ^H&, OF ftOOMS "; 

liflO INPUT J? 

f430 PRINT 

14;0 IF J9 < ] OH J? > 3 QR INTtJ?) <> ABB(JQS THW T 



1B3 



IT ri 
P 



1?5ll 
1?55 

1?iO 

1WD 

341 D 

203 D 
204i5 
2050 

2070 

2fl90 

2100 
2110 

?1J0 
2140 
:;i^0 
:riAo 

21 ?0 
21S0 
21^(1 
2200 
22tO 
2?24 

2240 

22:10 

2J70 

22B0 
?2^0 
2100 

232 D 

.r3J9 

2340 

53SI? 
2340 

":-i7i) 

23flO 

2410 
2430 

2450 

2470 

2<?0 
24fO 
2500 

2510 
2^20 
2^30 
2940 
2910 
29&0 
2S70 
2^0 
2585 



PRINT ^HOOM i"; 

INPST PfK) 

PRINT 

IF PCH] > Q AHB PCKa -^ 21 AHB IIIKF EIL) a«AiS(PCK^} TH£H 1?I0 

PifllT 'EERDA 

INFUT 29 

PfCiBT -*^i 

enio tAfo 
h£];t k 

PAINT 

AEfl - SHoar 

A?=Lett 

f oii: i:=l TO J* 

fas K1=1 TEl J 

If S(AftKl):3?4K» THEN iVfO 

NEXT K1 

fVE]1 - JfD TIMMEL FDR THE ARROV 

soro 2000 

J4LAT X 

PRINT "MISSES" 

REA - METVE NUnru^ 

QOSUt Z020 

SER - iMMO CHEf:^ 

IF A > THEN S?70 

PHIRT "TOU HrtVC JSED J^LL OF TQJR ARROUS." 

r-1 

BETUAH 

HEH - SEE [T AltROU IS M L[1J DT U?] 

A9"P(lt> 

IF Af O L<2h TilEM 2040 

PRINT -ANA! VQU GOT THE UUitfLiS' U& UA5 IV RG[]H';LC2) 

F=l 

RETURN 

TF Af <^ UU THEi* IMO 

PRINT -OEJCHi ARRfliI ODT ^tJ L " 

OOID UM 

AE«f - ffflVE UtMPUS RI^TINE 

K=fMC<0> 

IF E^4 THEM 2140 

L£23-Ba42>tH^ 

IF L(2J <> L THEif 2140 

PRINT -T5K rs* TSK- UUHPUS BCT ^013"'^ 

F:=-| 

RETUAfl 

REN ■ HOVE ROUT Iff t 

F"ii 

eCTfl 2210 

PftlilT" "ERECffi "; 

IriPUT If 

PRiijT 

PRLHT 

IflPUT L 

PREitT 

IF J_ < 1 flR J. > 20 DR ASSEL? <> INTCl? THEN 71 

FOR K=l TO 3 

HEH - CHECK IF LEQAL AQVE 

TF S(UIUKI-L EUEV 23^0 

NEXT K 

If t-L(1> THEIt 2350 

PRINT VIT P05SIILE - "; 

INPUT Z? 

PRiNS -"j 

0010 2210 

ItEH - DHECK Ftffi HAJj^KB^ 

LCI J'L 

REH - UUKPJS 

IP L ^> Ll2} THE« 2«30 

PRINT ",.. 0DP4< ItinPCI A UBriPUfll' 

REn - NDVE A Ul^ilPUS 

BDSUS 2oao 

[F F-0 THEfl 2430 

REft - PIT 

IF L <> L(3J IIEE L O L(4I THEM ^480 

PRINT '^TITIIIEEEE . . . FEU IH A PIT" 

F=-l 

RET UGH 

REM - BATS 

IF L O L(5J fWW L -^? 

PRINT "Eflf--SIPE« BAI 

L=FNIiMJ 

50 TO 2330 

RETtINN 

REN - SELECT CAVE 

GOTD 23S0 

PRINT "FfTROR "; 

IHPUT Zr 

PRINT "1 

FRI*fT -CAVE "[O-il '■; 

REST DUE 






TD 



4 * 



L[fil TMt« 2i320 

SffATCfi^ ELSEUKRESVILLE FDR TDUl' 



2JO0 
2d20 
2^0 
2^40 
2J5D 
2470 
2JSD 
24?0 
2?0D 
2?1C 
2720 
2730 
2735 
2737 
2740 

2742 
2741 

2750 
2760 
2770 
27BO 
27?0 
2600 
2910 
2R15 
2117 
2B20 
2022 
2B24 
2eJiJ 
2640 
2950 

2fl7i) 
2flS0 
2090 
2Sf5 
2B¥7 
2^00 

??02 
2*04 

J510 
2720 

2?40 
2*10 

iuo 

2?70 
2^75 
2fl77 
?TSO 
2VS2 
2ffi4 
2T?0 
3000 
3410 
3020 
3030 
J040 
3D50 
3055 

auis; 

3060 
306? 
30A4 

3090 
3100 
3t10 
3120 
^130 
3140 
3150 

3170 

31S0 
31?0 

3200 
3210 

j7;o 

3^30 

3240 
3350 
3Z40 
3270 
3ZS0 
32?0 
3300 
3310 



O ABSIN) THEN 2530 
2ftl »2ff?0^ ;£? 70 ^2030 , 31 30 



2^AplpT4,1,4,A 
?,ap10,lB^2,9,ll 
2^t4p20p4p13pt5rdp4,1d 
^17^l!p11pia^20,1314»1T 



5,2,3,ip3pip7 
,7p1Q,1Spfl,^l2 
If14p13p12t13pl4^t2t1«p1^ 
1*^17, 20j2j17,20^Tpia,T9 



,2,Jp5,4p4,? 
8pt0^11j?p11j12 
2p14^t5^E3,l3p1^^l3^14^U 
17pEfT20Tl7plQ^20Tl,1tt1f 



:npii[ k 

PRINT 

IF fKO OS »>6 OB ]HT(N) 

DM Ntl SDSUB 2750 ^27iO^ 

RETllftN 

REN - BDBECAHEDRDfl 

DATA 2r3^Br1p3pl0p2,4pl 

DATA 5,7^15^^,6,17^1,7, 

DATA lOp12^tft3JltlJp] 
DATA 13pl7»ZCf2^P«plSf? 
GCSUB 3240 

RETURN 

REN - nOBlua ATRIP 
FOR B1=l TO 1 
FOR B2'l TO 40 

EEAO BO 

MEH 02 

NCJr 31 

HATA 20,2,3^1?, 1p4p1p4p 
DATIi 4p5,a,5,a,?pip7,J0 
DATA ft1Zp13tlOfllp14p1 

DATA 14^t5,1Spl5pie,1?T 

SOSUB 3240 

SisORIf 

BEK - STR1N0 Of BEADS 

FOR B1=3 TO 2 

FOR BZ-1 TO AO 

f!EAB BO 

4fErT 12 

MEIT t1 

CTfiTfl 2,3.!0*t,3^4.1p2.4 

MTA 3p7p8p5p6,H,6p7,Tp 

lATA ?, 10^12^10,11,13,5 

fffiTH T4tl9|T7,14TCar'^r 

JiQSUS 324{] 

AETURH 

REf - NEX flJT UU TflRUS 

FDR £t=t TO 3 

fOR B2^T TJ] &0 

REAB to 

rtEKt BI 
NE:^^ Bl 

DATA i^10TlirJr?Tl?P?r9Tl8paT^,1?p9,10,20 

BAT A lrZp15,2,3,lPp3,4p12,4p3p13p3p4p14 

BATA 7^Ti^20fBf14fl7r?p1?,lSp1Op18pt?,fi^T?,2O 

DATA 1,1lTl2p2p12p13,3p13,14p4,14pl5p5p|1,t5 

IjDSUB 3210 

RETIUTN 

REfi - DEfiDRlTE U/ DEljEMERAtiEB 

FQ* B1M TO 4 

FDR B2i1 TD £Q 

RE AH BO 

NEH B2 

NEH £1 

DATA 1plt5,2,2p5p3p3,i,4,4,6pt^2,7 

IiATA 3,4j7,5,ipl0pG,?p9,Rp8plOp7p9,1t 

DATA ^li,13^J4+^2p^3,^3*llp^2p^2(]^t^lp^6rHtl^^1S 
DATA 1 4p 1 ?, 20, Of] 7,17,13^1 a^lSpU, If plV^ 1 4,20^20 
lOSUB 3240 
lETITAN 

RCn - DifE UAT IftTtlCE 
FOR Bl=1 TO 5 
FOR t2>l to 40 

READ SO 
ilEXT B2 
MEXT Bl 
DftTA 5p4^a^1,5,i,2pip7pJp7,ff,B,Qp12 

Di^rA 5p?,3o,ip^o,ll,7pr1p1^p12,13p1ipSpt3,^4 

DATA l0,14,]3,l1^1SfUjA^t7f2Ot13,T7,l3f14,td,l9 

DATA 15,T9p20p1,4,20,lp2p17p2p3p1B,3p4ptP 

SOSiJB 3240 

flETJRH 

HEN - TRPirr YOUR GUH CAUE 

FOB Jil To 20 

PfiiNr "flaoH H^';j; 

INPUI S{J,lJpS[J,2>,g<Jp1t 

FDR K^l TO 3 

IF SU^KJ > AND S(J,K5 < ?1 llHt AM (5< JTH:i=Afl3£S C J,K » ^ TblEII32 

PRINT "**f** EttROR"!"'" 

DCITO 3150 

KU K 

HEUI J 

RETUHN 

REH - lEtPUT CAliE 

FDR J=1 TQ 20 

FOR %'] TO 3 

READ SU,^} 

HtlCt \i 

NEi^T J 

RE lURIJ 

EMB 



184 




ia5 




RDCDimVIER 

GAMIE 



h 



■ nil llH I ■!■ 



Ip |M 



I. -h4fA /iwff"Ot^li/TP*'r6^tfWrH 




r.Jli'lvisiftvunLy. inxljp'UVtM-rtJVJJ^JiL J^ Hit MOKE. 

'Jlu5hii4 sfllr€ch-?lu«[I^dllJcta5^5arlH^VE^^*JKK-4^^l^t■^da 
.irnl 'Ik' V^ll■ '■ i- iLVfldtj 

_iri I" H- I I L I. _ _ ._ _ I y , . J , M^LjIinH 

\hLi ftbJi - ■ * h.ai Li^rU-^jLiiL ^ Ji Will ^ ■ 



T BASIC COMPUTER 6AME 



— MLIi^ IJIhJUIl'1, 1_".i||[I^LCt/rjJi.^rTliiKafflW 
^'Kni>- ->- >'' I'' - c^iW^ltKMtl lluslx:^^ An.Ur^lr^ 
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